register = "{'name': Name, 'number': Number, 'decimalPlaces': 0}"
deviceType = "{ 'name': File1, 'type': 'c8y_ModbusDeviceType', 'c8y_Coils': coils, 'c8y_Registers': registers }"
Nicht sicher, aber die fett markierten Stellen sind keine Strings (Hochkommas fehlen).
Für Number soll sicher der Wert 12 (von der VBA Variable Number) hin:
register = "{'name': Name, 'number': " & Number & ", 'decimalPlaces': 0}"
ACHTUNG: Sollte es hier Dezimalzahlen geben, dann aufpassen. Bei der Konvertierung von Zahl zu String verwendet VBA die Formateinstellungen der Systemeinstellung (Punkt, Komma und so).
|