2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    Fototrend

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

Új hozzászólás Aktív témák

  • #24844 BenJoe80 senior tag Delila_1 #24842
    Új Válasz #24844
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    BenJoe80

    senior tag

    válasz Delila_1 #24842 üzenetére

    :B :R :B

    Nagyon szépen köszönöm!!! Közben kértem segítséget máshonnan is és ha nem baj összehasonlítanám a tieddel. A te makród:

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 4 Then
    Application.EnableEvents = False
    Range(Target.Address) = Left(Target, 4)
    Application.EnableEvents = True
    End If
    End Sub

    A másik amit kaptam:

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("D:D")) Is Nothing And Target.Value <> "" Then

    ActiveCell.Value = Left(Target.Value, 4)
    End If
    End Sub

    Bár mindkét makró pontosan azt teszi amire szükségem van, csupán kíváncsiságból: mi a különbség?

    Megisznak egy deci pálinkát. Miért? "Olyan savam vót, meg köllet innom egy deci pálinkát, aszittem megbolondulok." Aztán megisznak négy liter bort. Miért? "Há' semmi savam nem volt má'!"

Új hozzászólás Aktív témák