---

Hallo Programmierer?

Gibt es eine Möglichkeit den Wert/die Eingabe einer Inputbox für den nächsten Macro-Aufruf zu übernehmen?

Mit freundlichen Grüßen
Bld1983

------------------
Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.

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

---

Servus

Du könntest zB den String irgendwo (zB Temp-Verzeichnis oder Userverzeichnis) abspeichern (Text-Datei, ini, ...)

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Hallo Bernd.

Danke für die Bestätigung.
Den Lösungsansatz hatte ich mit einer .xls Datei...

Wollte nachfragen ob jemand einen Weg ohne extra Datei kennt.

Mit freundlichen Grüßen
Bld1983

------------------
Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.

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

---

Servus

Wenn du eh schon in Excel programmierst: wie wäre es mit ini-Datei oder Einträgen in der Registry (siehe zB hier)

Gruß
Bernd

EDIT: weitere Möglichkeit zum lesen/schreiben in die Registry siehe zB hier

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Danke, für die Lösungsansätze.

Funktioniert es nur im VBA oder auch im CATScript? 

Lg
Bld

------------------
Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.

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

---

Dürfte auch im CATScript funktionieren

Link

—————————-
Windows Registry - Lesen/Schreiben

String in die Registry schreiben

Sub CATMain()

Text = "das steht jetzt in der Registry"
set oShell = CreateObject("WScript.Shell")
oShell.RegWrite "HKEY_CURRENT_USER\Software\MeinPRG\MeinText", Text, "REG_SZ"     ' für Strings
oShell.RegWrite "HKEY_CURRENT_USER\Software\MeinPRG\MeinBool", 1, "REG_DWORD"     ' für Boolean 1 = true / 0 = false
oShell.RegWrite "HKEY_CURRENT_USER\Software\MeinPRG\MeinInteger", 123, "REG_DWORD"  ' für Integer

End Sub

String aus Registry lesen

Sub CATMain()

set oShell = CreateObject("WScript.Shell")
Text = oShell.RegRead("HKEY_CURRENT_USER\Software\MeinPRG\MeinText")
MsgBox Text

End Sub
‘————-

------------------
Ich will es gar nicht wissen, aber ich muss.....Das Leben verlangt es.

[Diese Nachricht wurde von BLD1983 am 16. Okt. 2020 editiert.]

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