kopieren und einfügen einer Zelle, Wert in mehrere Zellen

Wenn ich arbeite in meinem spreadsheed, ohne Verwendung von vba-code konnte ich eine einzelne Zelle auswählen, "kopieren", dann wählen Sie eine Menge von Zellen und einfügen. Das Ergebnis wäre, dass alle Ziel-Zellen sind gefüllt mit dem, was Wert war in der Quell-Zelle.

Wie würde ich das in vba-code?

Man würde denken, die folgenden funktionieren würde, weil es imitiert das Verhalten oben beschrieben, aber es funktioniert nicht. Es füllt die oberste Zelle des zielbereiches mit dem Wert und lassen Sie den rest der Zellen leer. 

    Range("A1").Select
    Selection.Copy
    Range("B1:B12").Select
    ActiveSheet.Paste
  • Es funktioniert für mich. aber Sie können Range("A1").Copy Range("B1:B12") als eine Zeile.
  • Ich bin ratlos. Versuchte es noch einmal mit einem frischen Arbeitsblatt und es funktioniert wie es sollte. Das problem muss etwas anderes sein dann. Check meinen code wieder...
  • Sorry, mein Fehler. Der Fehler lag tatsächlich woanders in meinem code und ich reparierte es.
InformationsquelleAutor vanao veneri | 2016-09-01
  1. 3

    Brauchen Sie nicht, um mit copy & paste in VBA, können Sie die eingestellten Werte auf Bereiche, in etwa so:

    Range("B1:B12").Value = Range("A1").Value
    InformationsquelleAutor Geek Josh
Schreibe einen Kommentar