Hallo Ich möchte das Format der Zellen von meiner Spalte "I" in "0000" -Format ändern, mit einer Formel (folglich nicht mit der. NumberFormat-Methode) und VBA. .Ändern Sie das Format der Zellen mit Formeln

Zum Beispiel, wenn Bereich ("A1") Wert = 09, die Formel es 0009 verwandeln usw.

Ich habe dies versucht, aber es funktioniert nicht:

With Range("I2", Cells(Rows.Count, "I").End(xlUp)) 
    .Value = Evaluate("INDEX(TEXT(" & .Address(external:=True) & ",""0000""),)") 
End With

Vielen Dank im Voraus für Ihre Hilfe, mit freundlichen Grüßen, J.Garry

Quelle

2016-08-08 J.Garry

NON VBA

=right("000"&A1,4)

Im Allgemeinen auf einer Menge von Nullen auf der Vorderseite Tag, die die Zahl in eine Zeichenfolge konvertiert, dann nehmen Sie die letzten 4 Zeichen. Dies setzt voraus, dass Sie mit Ganzzahlen arbeiten und daher nicht durch Dezimalpunkte verworfen werden.

Quelle

2016-08-08 13:38:14

Vielen Dank, dies ist eine Möglichkeit, aber ich möchte VBA verwenden, weil dies Teil eines Programms ist –

ersetzen Sie es für Ihre andere Formel. im Grunde die Formel, die Sie in Ihrem EVALUAT (...) Teil haben. –

Ja, aber das bedeutet, dass ich eine leere Spalte erstellen, die Berechnung durchführen und dann die andere Spalte löschen muss. Es ist möglich, aber ich finde einen optimierten Weg, es zu tun –

Ändern Sie das Format der Zellen mit Formeln

Antwort

NON VBA

Verwandte Themen