Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1480to1484
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
Inhaltsverzeichnis

Von einem Sheet zu einem Sheet

Von einem Sheet zu einem Sheet
10.03.2016 09:35:56
Armin
Hallo VBA-Freunde,
Ich habe eine Frage und zwar ich habe zwei Sheets (Blatt1 & Blatt2) und möchte
alles was im Blatt1 in Rnage("A1:A30") steht (nur Werte keine Format) zum Blatt2 Range("B1:B30") übertragen.
Ich habe folgendes geschrieben:
Sheets("Blatt1").Select
Range("A1:A30").select
Selection.copy
Sheets("Blatt2").select
Range("B1:B30").select
selection.pastesepecila
aber funktioniert nicht so sauber wie ich wünsche!
Hat jemand eine bessere und professionelle vordschlag?
Danke voraus

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Von einem Sheet zu einem Sheet
10.03.2016 09:44:01
Michael
Hallo Armin!
zB so:
Sub VonUndZu()
Worksheets("Blatt1").Range("A1:A30").Copy
Worksheets("Blatt2").Range("B1").PasteSpecial xlPasteValues
Application.CutCopyMode = False
End Sub
LG
Michael

AW: Von einem Sheet zu einem Sheet
10.03.2016 09:51:27
Armin
vielen hertzlichen dank

AW: Von einem Sheet zu einem Sheet
10.03.2016 09:46:09
hary
Moin
Worksheets("Blatt2").Range("B1:B30").Value = Worksheets("Blatt1").Range("A1:A30").Value

gruss hary

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige