vba für gesamte Mappe

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

Betrifft: vba für gesamte Mappe
von: atikar
Geschrieben am: 13.11.2003 15:19:20

Hallo Leute,

ich habe ein vba das wenn ich es in z.B. in tabelle 1 einfüge dann dort auch funktioniert (abfragen macht) ich will aber das es für alle tabellenblätter funktioniert (egal wieviele eingefügt werden)

Wenn ich es aber in (diese Arbeitsmappe) einfüge dann funktioniert es nicht.

kann jemand helfen?

ciao

atikar

Bild


Betrifft: AW: vba für gesamte Mappe
von: Russi
Geschrieben am: 13.11.2003 15:31:23

Hallo Atikar!

Füge den Code in ein Modul (Menü->Einfügen->Modul) ein:

Public

Sub Atikar()
    ....
End Sub


Viele Grüße
Russi


Bild


Betrifft: AW: vba für gesamte Mappe
von: Atikar
Geschrieben am: 13.11.2003 15:51:46

Das Makro was ich in der Tabelle hinterlegt habe Frägt ab ob in einer bestimmten Zelle was eingegeben wird (z.B. in A2)
und das soll für alle Tabellen funktionieren.


Bild


Betrifft: Teillösung
von: Russi
Geschrieben am: 13.11.2003 16:06:22

Dann hilft Dir doch eine

Sub in ThisWorkbook:
Public 

Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Excel.Range)
   ....
End Sub


Ich glaube, mit "Target" kannst Du irgendwie abfragen, welche Zelle genau geändert worden ist. Leider weiß ist nicht, wie das genau funktioniert.

Russi


Bild


Betrifft: Komplettlösung
von: Russi
Geschrieben am: 13.11.2003 16:20:29


Public

Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Excel.Range)
    If Target.Address = "$A$1" Or Target.Address = "$C$1" Then
        MsgBox "Sie haben gerade Zelle A1 oder C1 verändert!"
    End If
End Sub



Bild

Beiträge aus den Excel-Beispielen zum Thema " Fortschrittsanzeige"