Variable Zelle wählen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Ich habe übrigens mal als Software-Entwickler gearbeitet, es lange her. Damals unter C und die Programme liefen unter Windows 1 :)
Im Team, wir war 8 Leute, wirst du ganz schnell genötigt, dich an gewisse Konventionen zu halten, ob du das gut findest, oder nicht.
Weil ich halt keine IT Ausbildung nachweisen konnte, aber aus privaten Gründen den Job gewechselt habe, bin ich dann wieder im
Maschinenbau gelandet, was halt meinem Studium entspricht. Da durfte ich mich dann wieder mit Fortran IV herum schlagen, mit der Datenbanksprache SAS,
mit Programmierung von Handhabungsgeräten usw. und während des IT-Studiums eines meiner Söhne hab ich mich auch an einen Java-Kurs angehängt.
Wenn du es auch nicht willst, es gibt überall Konventionen.
Aber es ist wie im Straßenverkehr. Viele machen sich heute ihre eigenen Regeln, je nachdem inwieweit sie die Regeln gut finden. Wenn es ihnen einen Vorteil bringt, gilt die Regel, sonst aber nicht.
Vielleicht liegt es daran, dass Quer-Denken modern ist, keine Ahnung.
Dann findest du halt auch Leute, die in modernen Programmiersprachen Codes erzeugen, wo dir vor lauter sprechenden Namen fast das Blech weg fliegt, womöglich dann auch noch mit französischen, schwedischen weiß der Geier an Umlauten, weil natürlich in der Landessprache. Das zu lesen macht dann richtig Spaß weil das Sprechende dir schon gar nichts erzählt aber die Struktur des Codes fast völlig verdeckt wird.

Zur Bestätigung dessen, was ich sagte:
(Bitte ohne Option Explicit ausführen)



Sub unit()



Debug.Print "i% " & myVarTypeTxt(i%)

Debug.Print "j$ " & myVarTypeTxt(j$)

Debug.Print "k# " & myVarTypeTxt(k#)



End Sub



Function myVarTypeTxt(vVariable As Variant) As String



Select Case VarType(vVariable)

    Case vbEmpty:           myVarTypeTxt = "Empty (nicht initialisiert)"

    Case vbNull:            myVarTypeTxt = "Null (keine gültigen Daten)"

    Case vbInteger:         myVarTypeTxt = "Integer"

    Case vbLong:            myVarTypeTxt = "Ganzzahl (Long)"

    Case vbSingle:          myVarTypeTxt = "Gleitkommazahl mit einfacher Genauigkeit"

    Case vbDouble:          myVarTypeTxt = "Gleitkommazahl mit doppelter Genauigkeit"

    Case vbCurrency:        myVarTypeTxt = "Währungswert"

    Case vbDate:            myVarTypeTxt = "Datumswert"

    Case vbString:          myVarTypeTxt = "String"

    Case vbObject:          myVarTypeTxt = "Objekt"

    Case vbError:           myVarTypeTxt = "Fehlerwert"

    Case vbBoolean:         myVarTypeTxt = "Boolescher Wert"

    Case vbVariant:         myVarTypeTxt = "Variant (nur bei Datenfeldern mit Variant-Werten)"

    Case vbDataObject:      myVarTypeTxt = "Ein Datenzugriffsobjekt"

    Case vbDecimal:         myVarTypeTxt = "Dezimalwert"

    Case vbByte:            myVarTypeTxt = "Byte-Wert"

    Case vbLongLong:        myVarTypeTxt = "LongLong-Ganzzahl (nur auf 64-Bit-Plattformen gültig)"

    Case vbUserDefinedType: myVarTypeTxt = "Variant-Werte mit benutzerdefinierten Typen"

    Case vbArray:           myVarTypeTxt = "Array (wird immer einer anderen Konstante hinzugefügt, wenn sie von dieser Funktion zurückgegeben wird)"

    Case Else:              myVarTypeTxt = "unbekannt"

End Select



End Function

Beliebteste Forumthreads (12 Monate)

27
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Variable Zelle wählen

27 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

27
Beiträge zum Forumthread

Beiträge zu diesem Forumthread