Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1736to1740
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1736to1740
1736to1740
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehler in VBA

Fehler in VBA
24.01.2020 10:32:21
Marcus
Guten Morgen,
hab mal wieder ein kleines Problem...
das hier funktioniert: 
Private Sub Worksheet_Activate()
Worksheets("Tabelle2").Range("A1") = Worksheets("Tabelle3").Range("A1")
End Sub

dieses hier klappt nicht.... 
Private Sub Worksheet_Activate()
ActiveSheet.Range("A1") = Worksheets("Tabelle3").Range("A1")
End Sub

Wo kann der Fehler liegen?

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehler in VBA
24.01.2020 10:38:02
ChrisL
Hi Marcus
Bei mir funktioniert es. Bitte lade eine Beispieldatei, womit man den Fehler nachvollziehen kann.
cu
Chris
AW: Fehler in VBA
24.01.2020 10:44:31
Luschi
Hallo Marcus,
die Frage ist doch, wie definierst Du 'Fehler':
- tritt das Ereignis nicht ein
- kommt ein Laufzeitfehler
- bleibt die Zielzelle leer, obwohl in der Quellzelle ein Wert steht
- u.u.u
Gruß von Luschi
aus klein-Paris
PS: bei mir klappt es übrigens ebenfalls Bestens!
AW: Fehler in VBA
24.01.2020 11:07:19
Marcus
Oh, sorry,
habs schon, habe etwas verdreht. So klappts bei mir:
Private Sub Worksheet_Activate()
Worksheets("Tabelle2").Range("A1") = ActiveSheet.Range("A1")
End Sub
Bei Auswahl eines Worksheets soll der Wert aus A1 immer in Tabelle2/A1 kopiert werden. Das tut es jetzt.
Vielen Dank für die schnellen Antworten und schönes WE
Anzeige
AW: Fehler in VBA
24.01.2020 10:41:02
SH95
Hallo Marcus,
bei mir funktioniert dein Code ohne Probleme, hast du eine Bsp.Datei?
Du kannst auch erstmal: 
Range("A1") = Worksheets("Tabelle3").Range("A1")

das testen.
Falls das nicht hilft, wäre eine Bsp-Datei die bessere Alternative.
Gruß
STefan

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige