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

  • Fferi50

    őstag

    válasz lappy #48802 üzenetére

    Szia!
    Pl.
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Intersect(Target, Range("A1:B8")) Is Nothing Then
       Target.Value = "akarmi"
    End If
    End Sub
    Ha a kiválasztott cella nem esik az A1 : B8 tartományba, beleírja a cellába a szöveget.
    [Itt a helpje]
    A target paraméter az a tartomány (egy vagy több cella), amely újonnan lett kiválasztva. A tartomány minden paraméterét vizsgálhatod az eseménykezelő makróban, sőt más cellák, tartományok, paraméterek függvényében alakíthatod a makró futását.
    FONTOS: Ha cellák értékét változtatod vagy másik tartományt szeretnél Select v. Activate paranccsal elérni a makró közben, akkor az elején ki kell kapcsolnod az eseménykezelést az Application.EnableEvents=False sorral - a kilépés előtt pedig visszakapcsolni True paraméterrel.
    Üdv.

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