Office: (Office 2010) VBA: Variable innerhalb Makro verwenden?

Hallo Freunde,

ich habe folgendes Problem:

Code:

Sub TestMakro()
Dim Wert1 As String
Dim Wert2 As String
Dim Wert3 As String
Dim Wert4 As String
Dim Wert5 As String

Wert1 = Range("G2").Value
Wert2 = Range("B10").Value
Wert3 = Range("B4").Value
Wert4 = Range("A5").Value
Wert5 = Range("B12").Value

Set cmd = CreateObject("CommandTool")
strResult = cmd.SendCommand("Wert1, "Wert2", "s=Wert3|v=Wert4|sl=Wert5", 5)

End Sub

Die Werte die ich per Dim as String definiert habe, stehen dabei in entsprechenden Zellen. Nun möchte ich, dass er in der untersten Zeile die Werte anwendet, um den SendCommand Befehl mit eben den Inhalten der Zellen auszuführen. Wie erreiche ich das?

Vielen Dank im Voraus

Mit freundlichen Grüßen

roger

 

Hi Roger,

wenn du Variablen verwendest, dann dürfen diese nicht in "" stehen wenn du auf sie zugreifen willst, andernfalls ist es ein fixer String - eben z.B. "Wert1" und nicht der Inhalt der Variablen Wert1.

Bis später,
Karin

 

Hallo Karin,

danke für die schnelle Antwort.
Wenn ich die "" weglasse, also den Code unten als:

strResult = cmd.SendCommand(Wert1, Wert2, s=Wert3|v=Wert4|sl=Wert5, 5)

angebe, bekomme ich eine Fehlermeldung "Fehler beim Kompilieren: Syntaxfehler"

Leider bin ich ein absoluter Grünschnabel was VBA angeht.

MfG

roger

 

Hi Roger,

dann musst du dich nochmal intensiv mit dem Befehl cmd.SendCommand(.....) auseinandersetzen, wie die Variablen gesetzt werden müssen.

Bis später,
Karin

 

Der eigentliche Befehl setzt Voraus, dass in den "" ein Wert vorhanden ist, eine Zahl oder ein Wort. Wenn ich diese Werte "per Hand" in die Gänsefüsschen eintrage, funktioniert alles tadellos. Das Problem ist aber, dass sich die Werte ständig ändern, also müsste ich das Macro permanent bearbeiten und den neuen Werten anpassen. Um das zu umgehen, möchte ich die Werte direkt aus den Zellen kopieren (diese aktualisieren sich von selbst) und in das Macro einfügen

MfG

roger

 

Hallo,

dann mache aus
strResult = cmd.SendCommand(Wert1, Wert2, s=Wert3|v=Wert4|sl=Wert5, 5)

Folgendes:
strResult = cmd.SendCommand(Wert1, Wert2, "s=" & Wert3 & "|v=" & Wert4 & "|sl=" & Wert5, 5)

Du musst also den Inhalt der Variablen Wert3, Wert4 und Wert5 verketten zusammen mit den Konstanten "s=" bzw. "|v=" bzw. "|sl="
Diese Verkettung geschieht mit dem &-Operator.

 

Hallo Exl

ich glaube, dass ist genau das was ich gesucht habe. Leider schaffe ich es nicht, es noch dieses Wochenende zu testen.
Montag Abend gebe ich Rückmeldung.
Wenn es funktioniert, bist du mein Held!
Vielen vielen Dank schon Mal!

Gruß

roger

 

Funktioniert einwandfrei!

Danke nochmal!