Microsoft Excel

Herbers Excel/VBA-Archiv

String editieren

Betrifft: String editieren von: Manfred
Geschrieben am: 19.08.2004 15:45:03

Hallo,

Ich hab eine Spalte in Excel in der stehen Beschreibungen von Teilen in folgendem Format aaa,bbb,ccc,ddd,.....,zzz,SS

z.B. Female Connector, 1/8" Tube, 1/8" Female NPT, SS

ich moechte nun per Macro diesen String in ein anderes Format bringen
aaa, SS, bbb, ccc, ddd, ..., zzz

z.B. Female Connector, SS, 1/8" Tube, 1/8" Female NPT

der wert SS steht immer am ende des Strings und soll immer nach aaa eingefuegt werden und durch ein Komma und Leerzeichen von aaa getrennt werden. Die Laenge von aaa ist variabel.

Ich hab zwar schon Programmiererfahrung mit C und Java, aber leider keine Ahnung von Macros und Visual Basic, deshalb bitte ich euch mir das komplette programm zu posten und nicht nur einen Ausschnitt.

Ich hoffe ihr koennt mit meinen Angaben was anfangen.

Danke im Voraus fuer eure Hilfe

mfg Manfred

  


Betrifft: AW: String editieren von: Thomas Risi
Geschrieben am: 19.08.2004 16:05:37

Hallo Manfred

Versuch's mal in etwa so ...


      
Option Explicit

Private Const DELIMITER = ","

Public Function StringEdit(s As StringAs String
    
    
Dim a
    
    a = Split(s, DELIMITER)
    
    StringEdit = a(0) & DELIMITER & a(3) & DELIMITER & a(1) & DELIMITER & a(2)
    
End Function 


     Code eingefügt mit Syntaxhighlighter 3.0

Gruß
Thomas

Risi Thomas Softwareentwicklung




  


Betrifft: AW: String editieren von: Manfred
Geschrieben am: 19.08.2004 19:08:59

Danke Thomas,

die Funktion sieht ja ganz gut aus, aber wie bekomm ich das macro zum laufen? Ich hab ueberhaupt keine Ahnung von Visual Basic. Kannst du das komplette macro posten?


  


Betrifft: AW: String editieren von: Manfred
Geschrieben am: 19.08.2004 22:10:38

Hat sich erledigt.
Hab es selbst hinbekommen.


 

Beiträge aus den Excel-Beispielen zum Thema "String editieren"