Telefonszámunk: 1-472-0679

[Resolved] VBA – Eseménykezelő makró probléma

Kezdőlap Fórumok Excel programozás [Resolved] VBA – Eseménykezelő makró probléma

Topic Resolution: Resolved

Ennek a témakörnek tartalma 2 hozzászólás, 2 résztvevő. Utolsó frissítés:  pexcel 2 hónapja telt el.

3 bejegyzés megtekintése - 1-3 / 3
  • Szerző
    Bejegyzés
  • #6944

    pexcel
    Felhasználó

    Sziasztok!
    Egy relatíve egyszerű eseménykezelő makróval kapcsolatban szeretném kérni a segítségeteket.
    A makró mindössze annyi lenne, hogy amennyiben rutinnal ellátott sheet „A” oszlopában bármilyen változás történik, akkor a „Result” elnevezésű sheet egy változó segítségével definiált tartományát törölje.
    Ez a kód (talán ez most elegendő, de ha kell csatolok mintatáblát is):
    Private Sub Worksheet_Change(ByVal Target As Range)

    Dim KeyCells As Range
    lRow = Sheets(“Result”).Cells(Rows.Count, 2).End(xlUp).Row

    Set KeyCells = Range(“A:A”)

    If Not Application.Intersect(KeyCells, Range(Target.Address)) _
    Is Nothing Then

    Sheets(“Result”).Activate
    ActiveSheet.Range(Cells(2, 2), Cells(lRow, 3)).Select
    Selection.ClearContents

    End If
    End Sub

    A rutin az ’ActiveSheet.Range(Cells(2, 2), Cells(lRow, 3)).Select’ sornál a következő hibára fut:
    Application-defined or Object-defined error
    Hálás lennék, ha tudnátok segíteni.
    Előre is köszönöm,
    Péter

    #6945

    horvimi
    Adminisztrátor

    Szia!

    Ebbe én is belefutottam az elején..
    Ha egyszer megadod a munkalap hivatkozást, akkor mindenhová meg kell adnod.

    activesheet.Range(activesheet.Cells(2, 2), activesheet.Cells(5, 3)).Select

    De ha nem adsz munkalap hivatkozást, akkor automatikusan az aktív munkalapon történnek a dolgok.
    Tehát, ha az elejéről törlöd az ActiveSheet-et, akkor is jó lesz.

    imre

    #6946

    pexcel
    Felhasználó

    Szia Imre,
    Nagyon köszönöm a gyors választ!
    Az általad írt módon a kód lefut, én pedig megint tanultam valami hasznosat.

    Köszönöm,
    Péter

3 bejegyzés megtekintése - 1-3 / 3

Be kell jelentkezni a hozzászóláshoz.