Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Variable in Zwischenablage übernehmen

Gruppe

Variable

Problem

Wie kann ich den in einer Variablen gespeicherten Wert in die Zwischenablage übernehmen, so daß ich ihn mit STRG+V an beliebige Stellen des Arbeitsblattes einfügen kann?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub Var2ClipBoard()
   Dim ClipAbLage As DataObject
   Dim sTxt As String
   Set ClipAbLage = New DataObject
   Range("A1").Select
   sTxt = InputBox("Variablenwert:", , "Hallo!")
   ClipAbLage.SetText sTxt
   ClipAbLage.PutInClipboard
   ActiveSheet.Paste
End Sub