---

Hallo,
ich habe da ein Problem beim Zuweisen von Parameterwerten in dynamischen Blöcken.

Wenn ich in meinem Code die Zeile:

Code:

---

DynBloProp.Value=500#

---

einbaue klappt alles wunderbar.
Aber die "500" würde ich gerne durch eine Variable ersetzen die ich in einer Inputbox Abfrage:

Code:

---

Parmater_Wert_neu = InputBox(Prompt:="Für den Block: " & ListBox1.Value + Chr$(13) + "einen neuen Wert für " & ListBox2.Value & " eingeben." + Chr$(13) + "(alter Wert: " & ListBox3.Value & ")", Title:="Neuen Wert eingeben")
DynBloProp.Value = Parmater_Wert_neu

---

Aber so funktioniert die Zuweisung des Wertes leider nicht.
Ich weiß, es hat etwas mit dem „#“ zu tun, aber leider fehlen mir da noch ein paar Grundlagen bei ACAD VBA.
Es wäre nett wenn mir da einer auf die Sprünge helfen könnte.

LG Woppi

PS. der neue Wert kann Zahlen oder auch Text einhalten, deswegen habe ich "Parmater_Wert_neu" so declariert:

Code:

---

Dim Parmater_Wert_neu As Variant

---

 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Woppi,

Änderst Du Werte in Blöcken oder Blockreferenzen? Sprich die Blockbeschreibung oder den eingefügten Block?
Wie ist der Wert in der Blockdefinition definiert? Sind dort sowohl Zahlen als auch Texte zugelassen?
Ich habe mich noch nicht so ausführlich mit dyn. Blöcken beschäftigt aber evtl. ist das ja ein Problem.

InputBox gibt ja prinzipiell einen Text zurück
Dem Code würde ich entnehmen dass der Block hier einen Doublewert erwartet, das Zeichen # veranlasst VBA dazu diese Konvertierung automatisch zu machen. Um einen Stringwert in einen Doublewert umzuwandeln kannst Du dazu die CDbl()-Funktion verwenden
Bringt diese Funktion einen Fehler (weil Text oder nichts eingegeben wurde) weißt Du ja dass hier ein Text eingegeben wurde.
Also am besten vor dem CDbl ein "On Error resume next" und danach "If Err then ..."

Grüße
Klaus 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Klaus,

du hast genau richtig vermutet!
Ich habe bei den Parametern, bei denen eine Zahl erwartet wird die Funktion CDbl() eingebaut, und alles funktioniert wie gewünscht!

Super!!

Vielen Dank,

Gruß Woppi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP