Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
760to764
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
760to764
760to764
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Eingaben in Zwischenablage kopieren

Eingaben in Zwischenablage kopieren
04.05.2006 08:11:29
ray
Moin,
wie kann ich den Inhalt einer Testbox auf ein UF in die Zwischenablage kopieren, so daß mir diese in anderen Anwendungen zur Verfügung steht?
Viele Grüße aus dem super sonnigen HH
ray

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eingaben in Zwischenablage kopieren
04.05.2006 08:23:13
Peter
Servus,
da ich jetzt nicht genau weiss, was für ein Konzept du so genau planst, mal ein Makro mit Kontextmenü.


Public Sub prcMakro(strName As String)
Dim cmbX As CommandBar
Dim cbb1 As CommandBarButton, cbb2 As CommandBarButton, cbb3 As CommandBarButton
On Error Resume Next
Application.CommandBars("UF").Delete
Set cmbX = CommandBars.Add(Name:="UF", Position:=msoBarPopup, temporary:=True)
With cmbX.Controls
    Set cbb1 = .Add
    Set cbb2 = .Add
    Set cbb3 = .Add
    With cbb3
        .Caption = "Löschen"
        .OnAction = "LöschenUF"
        .Style = msoButtonIconAndCaption
        .TooltipText = "Löscht den Inhalt des Textfeldes"
        .Tag = strName
    End With
    With cbb2
        .Caption = "Einfügen"
        .OnAction = "EinfügenUF"
        .Style = msoButtonIconAndCaption
        .TooltipText = "Kopiert die Zwischenablage in das Textfeld"
        .Tag = strName
    End With
    With cbb1
        .Caption = "Kopieren"
        .OnAction = "KopierenUF"
        .Style = msoButtonIconAndCaption
        .TooltipText = "Kopiert den gesamten Inhalt in die Zwischenablage"
        .Tag = strName
    End With
End With
    cmbX.ShowPopup
End Sub
Sub LöschenUF()
BMaske.Controls(Application.CommandBars.ActionControl.Tag) = ""
End Sub
Sub KopierenUF()
BMaske.Controls(Application.CommandBars.ActionControl.Tag).Copy
End Sub
Sub EinfügenUF()
    Dim mydata As New DataObject
    mydata.GetFromClipboard
    BMaske.Controls(Application.CommandBars.ActionControl.Tag) = mydata.GetText(1)
End Sub


MfG Peter
Anzeige
?
04.05.2006 09:22:37
ray
Hi Peter,
das ist to much. Ich erklär mal genauer:
Auf ein Userform soll ein button gedrückt werden. Dadurch werden die Inhalte der Testboxen tb1 und tb2 in die Zwischenablage kopiert (das Klemmbrett neben der Schere).
Mehr nicht...
Dann öffne ich ein Prog für SMS versenden und will dort manuell Einfügen.
Viele Grüße
ray
heut wahr wohl kein genialer Moment ;-) ...
04.05.2006 10:48:53
Peter
Servus Ray,
...bei der Fragestellung.
Dann halt so.
Private Sub CommandButton1_Click()
Dim myData As DataObject
Set myData = New DataObject
myData.SetText Me.TextBox1 & Me.TextBox2
myData.PutInClipboard
End Sub

MfG Peter
Anzeige
...bei Dir schon
04.05.2006 10:55:53
ray
Hi und Danke. Genau, was ich wollte.
Sag mal, da ich ja die Infos aus Excel per SMS versenden will, gibt es eigentlich auch eine Möglichkeit via VBE SMS-Versendungscode (capi...) schreiben kann, oder stößt das an die Grenzen von VBE?
Viele Grüße aus dem sonnigen HH
ray
ich hab nicht die geringste Ahnung, sry o.w.t
04.05.2006 10:59:21
Peter
MfG Peter

304 Forumthreads zu ähnlichen Themen

Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Anzeige
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
In Zwischenablage kopieren
Claudia

Hallo liebe VBA-Profis,
ich habe eine sehr einfache Bitte. Ich möchte die Daten aus den ersten drei Spalten (ab Zeile 2 einschließlich der letzten befüllten Zelle in Spalte A) mittelsn Makro in die Zwischenablage kopieren. Mehr nicht. :-)
Ich könnte das natürlich mit der Hand machen, d...
15.12.2008 18:19:49
Thread-ID: 1033106
4 Beiträge
Anzeige
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
suchen kopieren einfügen vba
Bea

Hallo zusammen
Ich hab folgendes Problem.
in der angehängten Beispielmappe möchte ich, das die in Arbeitsblatt "Nummern" hinterlegten Anfänge von Telefonnummern in Arbeitsblatt "evnachweis" gesucht die jeweiligen Zeilen kopiert und dann in Arbeitsblatt in dem Fall "Februar" (am besten...
10.03.2009 11:55:49
Thread-ID: 1058557
9 Beiträge
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
Mit VBA Zeilen in neue Register kopieren
Andreas

Ein Tabellenblatt soll nach einem bestimmten Kriterium durchsucht werden. Immer wenn das Suchkriterium gefunden wird, soll die Zeile kopiert und in ein neues Tabellenblatt eingefügt werden. Dies soll solange geschehen bis alle Zeilen durchsucht worden sind.
Im Detail soll dies wie folgt fun...
08.06.2009 12:29:49
Thread-ID: 1079883
3 Beiträge
Gesperrte Zellen in Zwischenablage kopieren
Elias

Hallo Forum,
ich habe eine Tabelle, in welcher ein Datenbereich von B5:B20 per Button in die Zwischenablage kopiert werden soll.
Der Kram mit dem Button ist alles kein Problem, aber die Crux ist:
-Die Zellen sind gesperrt.
-Das PW darf nicht im VBA-Code hinterlegt werden, da das...
13.06.2009 23:26:05
Thread-ID: 1081337
6 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
7
1
2
3
10
2
8
2
2
5
7
6
1
4
7
3
1
5
5
6
8
2
2
8
1