Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Kopie einer Zelle in jeder Tabelle

Kopie einer Zelle in jeder Tabelle
14.07.2006 11:15:12
Mike
Mahlzeit Expertenteam.
Habe mir mit dem Makrorecorder folgendes aufgezeichnet:

Sub KopieTabellennamen()
Range("A1").Select
Selection.Copy
Range("B2:B5").Select
ActiveSheet.Paste
End Sub

Ich möchte aber das dieser Vorgang in allen Tabellenblättern der Arbeitsmappe ausgeführt wird. In jeder Tabelle soll also die Zelle A1 in den Bereich B2-B5 kopiert werden. Einzig bei meiner letzten Tabelle soll nichts passieren (Tabelle55). Könnt ihr mir dabei helfen? Merci!
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopie einer Zelle in jeder Tabelle
14.07.2006 11:40:56
ChrisL
Hallo Mike

Sub t()
Dim WS As Worksheet
For Each WS In ThisWorkbook.Worksheets
WS.Range("A1").Copy WS.Range("B2:B5")
Next WS
End Sub

Gruss
Chris
AW: Kopie einer Zelle in jeder Tabelle
14.07.2006 12:30:44
Mike
Merci. Das ist es.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige