Microsoft Excel

Herbers Excel/VBA-Archiv

Formel und Zellformat in VBA

Betrifft: Formel und Zellformat in VBA von: Dirk L.
Geschrieben am: 19.11.2014 15:18:38

Hallo Profis,

wieder mal ein kleines Anliegen für die VBA-Profis.

Ich möchte in einer Zelle eine Zahl eingeben, die nachher noch über SVerweis mit anderen Zeichen verkettet wird und dann das Zahlenformat "0000" hat.

Erbebnis soll dann z.B. so aussehen: SQ-0001

Habe euch eine kleine Tabelle angefügt.

https://www.herber.de/bbs/user/93877.xlsm

Gruß
Dirk

  

Betrifft: AW: Formel und Zellformat in VBA von: Bernd
Geschrieben am: 19.11.2014 15:21:30

Hi Dirk!

Benutzerdefiniertes Format mit: "SQ-"0000

lg Bernd


  

Betrifft: AW: sorry falsche Lösung von: Bernd
Geschrieben am: 19.11.2014 15:27:12

Hi,

habs wieder auf offen gestellt, war da zu schnell im Denken.

lg Bernd


  

Betrifft: Das geht mit einer Prozedur zum Ereignis ... von: Luc:-?
Geschrieben am: 19.11.2014 15:41:37

Worksheet_Change, Dirk,
wobei der Parameter Target die geänderte Zelle repräsentiert und deshalb zuvor auf Relevanz geprüft wdn muss:
If Not Intersect(Target, Me.Cells(3, 2)) Is Nothing Then
Im True-Fall folgt dann:
Target.NumberFormat = """" & Left(Target.Offset(-2, 0), 1) & Left(Target.Offset(-1, 0), 1) & "-""0000"
Gruß, Luc :-?

Besser informiert mit …


  

Betrifft: Die eingegebene Zahl bleibt aber zB 1, ... von: Luc:-?
Geschrieben am: 19.11.2014 15:48:13

…was bei einem nachfolgd SVERWEIS berücksichtigt wdn muss, während Mattis Lösung direkt im SVERWEIS verwendet wdn kann. Falls der SVERWEIS aber ebenfalls über VBA realisiert wdn soll, kann statt des Zell.Value auch der Zell.Text verwendet wdn, der dann die angezeigte Form hat.
Luc :-?


  

Betrifft: AW: Das geht mit einer Prozedur zum Ereignis ... von: Dirk L.
Geschrieben am: 20.11.2014 09:33:18

Hallo Luc,

klappt prima danke.

Gruß
Dirk


  

Betrifft: Bitte sehr, gern geschehen! Gruß owT von: Luc:-?
Geschrieben am: 20.11.2014 14:59:16

:-?


  

Betrifft: AW: Formel und Zellformat in VBA von: Matthias L
Geschrieben am: 19.11.2014 15:42:35

Hallo

Warum schreibst Du die Verkettung denn nicht gleich in die Zelle

 ABCDEF
1Eingabefeld 1System    
2Eingabefeld 2Qualität    
3Eingabefeld 30001    
4      
5Ergebnis in     
6Eingabeld 3SQ-0001    
7SollSQ-0001    
8      
9 Matrix1  Matrix 2 
10 SystemS QualitätQ
11 ProzessP UmweltU
12    EnergieE

Formeln der Tabelle
ZelleFormel
B6=LINKS(B1;1)&LINKS(B2;1)&"-"&TEXT(B3;"0000")

Datengültigkeit der Tabelle
ZelleZulassenDatenEingabe 1Eingabe 2
B1Liste =$B$10:$B$11 
B2Liste =$E$10:$E$12 


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4



Andere Kombination

 ABCDEF
1Eingabefeld 1Prozess    
2Eingabefeld 2Energie    
3Eingabefeld 30004    
4      
5Ergebnis in     
6Eingabeld 3PE-0004    
7Soll     
8      
9 Matrix1  Matrix 2 
10 SystemS QualitätQ
11 ProzessP UmweltU
12    EnergieE

Formeln der Tabelle
ZelleFormel
B6=LINKS(B1;1)&LINKS(B2;1)&"-"&TEXT(B3;"0000")

Datengültigkeit der Tabelle
ZelleZulassenDatenEingabe 1Eingabe 2
B1Liste =$B$10:$B$11 
B2Liste =$E$10:$E$12 


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

Gruß Matthias


 

Beiträge aus den Excel-Beispielen zum Thema "Formel und Zellformat in VBA"