Hiiillllffffeeee (Kleinigkeit)

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox


Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Hiiillllffffeeee (Kleinigkeit)
von: Sabine
Geschrieben am: 24.05.2002 - 10:12:45

HI,
ich möchte einen Zellbereich(Inhalt der Zellen) als Variable speichern und irgendwann mit demselben Bereich vergleichen.
(Hat sich etwas verändert? ja, nein)
Bei Veränderungen möchte ich eine Prozedur ausführen
Kleine Frage, aber wie mache ich das????
(Zellbereich ist (A1-A80))

nach oben   nach unten

Biiiiittttttteeeee schööööön !
von: mathias r.
Geschrieben am: 24.05.2002 - 10:26:09

Die werte in einem Datenfeld ablegen und später mit den Zellinhalten vergleichen:


Dim mvarBereich(79)

Sub lesen()
Dim As Integer
  For i = 1 To 80
    mvarBereich(i - 1) = Cells(i, 1)
  Next
End Sub


Sub compare()
Dim As Integer
  For i = 1 To 80
    If Cells(i, 1) <> mvarBereich(i - 1) Then
      MsgBox "Änderung liegt vor !"
      'call MeinMakro
      Exit Sub
    End If
  Next
End Sub


nach oben   nach unten

Re: Biiiiittttttteeeee schööööön !
von: Sabine
Geschrieben am: 24.05.2002 - 10:29:51

Vielen Dank, das hat mir grad das Leben gerettet.
Gruss Sabine

nach oben   nach unten

Re: Biiiiittttttteeeee schööööön !
von: Sabine
Geschrieben am: 24.05.2002 - 11:02:56

Danke das ist super, du hast mir sehr geholfen.

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Zellen verbinden"