Hirdetés

  2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
Keresés

Hirdetés

100 000 érv a ReGalaxy mellett: Vásárolj Galaxy Z Fold7 I Z Flip7 vagy Galaxy S25 szériás készüléket, és régi mobilod felújítását 100 000 Ft-ig mi álljuk!
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    Mobilarena

    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

  • #53170 Fferi50 Topikgazda Yutani #53169
    Új Válasz #53170
    Ú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

    Fferi50

    Topikgazda

    válasz Yutani #53169 üzenetére

    Szia!
    Egy példa, ami alapján el lehet indulni: A képletet a makró irja be a B2 cellába!!! A munkalap kódlapjára (lapfülön jobb egérgomb - kód megjelenítése) az alábbi makrót kell beilleszteni:
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("E1:H1")) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    Range("B1").Formula = "='" & Range("E1").Text & "\[" & Range("F1").Text & "]" & Range("G1").Text & "'!" & Range("H1").Text
    Application.EnableEvents = True
    End Sub
    Ha változtatod az F1:H1 cellákban levő adatot, akkor változik a képlet a B1 cellában és megjelnik az új eredmény. Ebben a formában kell beírni, azaz az útvonal végére nem kell \ és kell a fájl kiterjesztés.
    Figyelem, hibakezelés nincs benne. Először töltsd ki a négy cellát és utána másold be a makrót, különben hibaüzeneteket fogsz kapni.
    Makróbarátként kell menteni!
    Üdv.

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