Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1404to1408
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1404to1408
1404to1408
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlenformat mit oder ohne vba

Zahlenformat mit oder ohne vba
06.02.2015 09:09:56
Gerhard
Hallo alle,
über einen button erhöhe ich in einer Zelle eine fünfstellige Zahl um 1.
wsB.Range("E17").Value = wsB.Range("E17") + 1
Nun möchte ich aber noch, dass nach der Zahl ein Bindestrich und das aktuelle Jahr steht, also z.B.: 00956 - 2015.
Es würde mir auch reichen, wenn das Format der Zelle so geändert werden könnte, z.B.: 00000 - JJJJ ergäbe dann: 00956 - 2015
oder so ähnlich.
Weiß jemand Rat? Im voraus vielen Dank für eure Hilfe.
Viele Grüße
Gerhard

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlenformat mit oder ohne vba
06.02.2015 09:35:55
Daniel
HI
im Benutzerdefinerten Zahlenformat einstellen:
00000" - 2015"
muss halt jedes Jahr manuell angepasst werden.
Gruß Daniel

AW: Zahlenformat mit oder ohne vba
06.02.2015 09:44:19
Gerhard
ja, das hatte ich auch schon, aber das Anpassen wollte ich vermeiden.
Gruß Gerhard

AW: Zahlenformat mit oder ohne vba
06.02.2015 10:19:35
hary
Moin Gerhard
Starte mal mit leerer Zelle E17. 
With Range("E17")
If .Value = "" Then
.Value = Format(.Value + 1, "00000") & " - " & Year(Date)
Else
.Value = Format(Left(.Value, InStr(1, .Value, " - ") - 1) + 1, "00000") & " - " & Year(Date) _
End If
End With

gruss hary

Anzeige
AW: Zahlenformat mit oder ohne vba
06.02.2015 10:46:15
Gerhard
Hallo Harry,
vba meckert beim code nach "else"
?

AW: Zahlenformat mit oder ohne vba
06.02.2015 10:49:33
Gerhard
sorry harry,
es funktioniert, ich hatte vergessen mit leerer Zelle zu starten.
Vielen Dank!

AW: Zahlenformat mit oder ohne vba
06.02.2015 10:22:53
Daniel
Hi
erhöhe den Wert in einer anderen Zelle (Z.b. X1)
in die Ausgabezelle kommt dann die Formel: 
=Text(x1;"00000")&" - "&Jahr(heute())

Gruß Daniel

AW: Zahlenformat mit oder ohne vba
06.02.2015 10:28:34
Gerhard
An alle Helfer:
vielen Dank für eure Hilfe. Werde das am Wochenende testen.
Allen ein schönes weekend................
Gruß Gerhard

328 Forumthreads zu ähnlichen Themen

Inputbox Schriftart oder Farbe verändern
Gunter

Hallo Zusammen,
ich habe eine Inputbox, über die eine Passwortabfrage gesteuert wird. Leider ist das Passwort im Eingabefeld zu sehen. Ist es möglich den Text z.B. in der Schriftart "Wingdings" zu formatieren, oder
die Schriftfarbe in weiss, damit das Passwort nicht mehr zu sehen ist?
28.08.2008 15:32:00
Thread-ID: 1005474
7 Beiträge
Anzeige
Zugriff auf Access-DB über DAO oder ADO
Armin

Hallo,
ich hätte eine allgemeine Frage zum Zugriff auf Access-Datenbanken.
Welche Zugriffsmethode auf eine Access-DB würdet Ihr generell empfehlen: ADO oder DAO?
Gibt es in der Praxis Vor- oder Nachteile für die eine oder andere Zugriffsweise?
Vielen Dank für Euere Meinungen und...
03.09.2008 14:28:55
Thread-ID: 1007110
2 Beiträge
offset? mit Combo oder Listbox aber wie?
Thomas

Hallo und einen schönen guten Tag
Bitte um Hilfe.
Offset aber wie?
Ich möchte 2 List- oder Combofelder aus einer UserForm mit Werten der aktiven Zeile füllen, die ich dann mit Hilfe der List oder Combobox ändere.
z.B.
A5 oder A6 oder A150 u.s.w.
B5 oder B6 oder B150 u....
16.09.2008 11:37:00
Thread-ID: 1010027
6 Beiträge
Anzeige
WENN/ODER Funktion
Dessin

Guten Abend
ich möchte gerne wissen, wieviele ODER-Fragen in eine WENN Funktion eingebunden werden können.
folgendes Beispiel:
Grundfunktion: wenn (X=wahr,dann A1 sonst B1)
meine Frage: wenn (oder(C1={"x";"y"};D1={"x";"y"});A1;B1)
C1 ist eine ODER Frage die ich, wie ich w...
27.10.2008 20:15:00
Thread-ID: 1019734
3 Beiträge
Wenn-Oder Formel über VBA funktioniert nicht
sharky1000

Hallo,
ich habe eine etwas komplexere Wenn-Oder Formel erstellt, welche ich über VBA in eine Zelle einfügen möchte.
Formel in E2:
=WENN(ODER(LINKS(D2;2)="M1";LINKS(D2;2)="M2";LINKS(D2;2)="M3";LINKS(D2;2)="M4";LINKS(D2;2)="M5"); LINKS(D2;1);WENN(LINKS(D2;2)="NM";LINKS(D2;2);WENN(LIN...
06.11.2008 14:11:01
Thread-ID: 1022285
7 Beiträge
Bedingte Formatierung oder VBA?
maruseru

Hallo werte Profis
Irgendwie raff ich es heute nicht
Habe eine Spalte mit Artikel Nummern. Jeweils das erste Zeichen ist = Produkte Typ.
A976164
A980602
B181645
B491942
F199587
F215047
F224410
G224410
F232634
Ich möchte nun anhand des ersten Zeich...
27.11.2008 14:09:45
Thread-ID: 1028367
7 Beiträge
wenn-oder-Funktion
Meli

Hallo,
ich habe hier das Beispieldatei eingefügt: https://www.herber.de/bbs/user/57552.xls
Ich verstehe nicht, was an meiner Formel ~=WENN(ODER(F8>1200;G8>1200;Z8>1200;F8 Ich möchte nämlich in Spalte AB, dass es eine 1 erscheint, wenn in Spalte F, G oder Z die Werte höher als...
11.12.2008 16:03:45
Thread-ID: 1032094
7 Beiträge
Schaltflächen oder Image Beispiele
Walter

Hallo Zusammen,
erst mal ALLEN ein gesundes neues Jahr !!!
Ich such Schaltflächen oder Image Beispiele, hatte mal in Google gesucht, leider
nichts gefunden,
vielleicht hat jemand eine Beispielmappe,
mfg Walter
01.01.2009 13:10:00
Thread-ID: 1036231
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
5
1
5
5
2
6
6
6
8
2
11
2
2
3
8
4
3
15
3
16
5
4
2
1