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
752to756
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
752to756
752to756
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeichen in Variable ersetzen

Zeichen in Variable ersetzen
07.04.2006 14:17:50
Charly
Hallo Forum,
ich möchte dynamisch aus einer Zelle den Namen für ein Tabellenblatt vergeben.
Das ganze läuft auch sehr gut, ich "beschneide" die Variable, die den Inhalt der Zelle wiederspiegelt auf 30 Zeichen, da dies das Maximum ist.
Allerdings habe ich nun noch das Problem, dass, wenn Sonderzeichen in der Varibale enthalten sind ich eine Fehlermeldung bekomme.
Da Tabellennamen die Zeichen ": / \ ? * [ ]" nicht enthalten dürfen möchte ich jetzt nach diesen suchen und sie ersetzen. Das Problem ist halt, dass nicht sicher ist ob und welches Zeichen in der Variable enthalten ist.
Wie schaff ich es, dass bei der Variable Ziffer für Ziffer nach diesen Zeichen gesucht wird und diese dann durch z.B. "-" ersetzt werden.
Hab hier schon rumexperimentiert ohne Ende, bin aber leider kein VBA PG... :(
Merci für eure Hilfe schon mal!
Cheers
Charles

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeichen in Variable ersetzen
07.04.2006 15:38:36
IngGi
Hallo Charly,
prüfe Zeichen für Zeichen in einer Schleife:

Sub Sonderz_ersetzen()
Dim strName As String
Dim strZeichen As String
Dim i As Integer
strName = Range("A1")
For i = 1 To Len(strName)
strZeichen = Mid(strName, i, 1)
If strZeichen = "[" Or strZeichen = "]" Or strZeichen = "/" _
Or strZeichen = "\" Or strZeichen = "?" Or strZeichen = ":" _
Or strZeichen = "*" Then
strName = Left(strName, i - 1) & "-" & Right(strName, Len(strName) - i)
End If
Next 'i
End Sub
Gruß Ingolf
Anzeige

300 Forumthreads zu ähnlichen Themen

Zeichen in String einfügen
Dieterlem

Hallo Excelfreunde,
ich möchte mit einer Formel Zeichen in einen String einfügen. Der String soll wie folgt umgewandelt werden:
121245f12345 = 121245-F-12345
Es soll also vor und hinter dem Buchstaben ein Bindestrich eingefügt werden. Der Buchstabe soll in ein Großbuchstaben gewande...
12.12.2008 15:08:00
Thread-ID: 1032419
14 Beiträge
Anzeige
Zeichenfolge im Dateinamen ersetzen
Dirk

Hallo Forumsmitglieder,
ich hoffe jemand hat (mal wieder) Lust mir zu helfen!!!!
Der unten teilweise aufgeführte Code benennt Bilddateien.
Der Code funzt soweit auch super. Leider gibt es Dateien, die haben im Namen Text, der noch mit "" ersetzt werden müsste.
Als Beispiel:
...
11.05.2009 15:54:39
Thread-ID: 1074392
6 Beiträge
Nur 50 Zeichen eines Strings auslesen
Kai

Hi,
ich habe in A1 einen String stehen, den möchte ich auslesen und weiter verwerten. Wenn der String aber über 50 Zeiche hat, sollen nur die ersten 50 Zeichen ausgelesen werden, der Rest kann ignoriert werden.
String = Sheets("Daten").Range("A1")
Wie lesen ich diese aus ?
Dank...
20.05.2009 08:15:40
Thread-ID: 1076201
15 Beiträge
Anzeige
Leerzeichen innerhalb eines Strings finden
pitmu1@web.de

Hallo zusammen,
wer kann mir sagen, wie man das 2. Leerzeichen von rechts innerhalb eines Strings finden kann.
Möglicherweise ohne VBA.
Danke im voraus
17.09.2009 09:40:42
Thread-ID: 1103455
3 Beiträge
alle Sonderzeichen in String ignorieren
Frank

Guten Abend liebes Forum,
ich erstelle mir derzeit aus einer csv Datei, die ich in Excel importiert habe neue Verzeichnisse. Das heißt ich möchte mein Musikarchiv sortiren auf Grundlage der ID3 Tag Infos. Nur leider ist nicht immer der ID3 Tag sinnvoll und/oder beim Import 4 " - Zeichen vor...
23.09.2009 23:31:36
Thread-ID: 1105092
8 Beiträge
Text ab erster Zahl darstellen
albin

Hallo!
Ich hab eine Liste mit Artikelbezeichnungen. Diese setzen sich aus einer Beschreibung und Dimensionen zusammen.
Ich möchte gerne nur die Beschreibung (die aber immer unterschiedlich lang ist) in einem neuen Feld haben.
Ergebnis soll der Text vor der ersten Zahl sein:
http...
23.10.2009 14:47:20
Thread-ID: 1111677
4 Beiträge
Zeichen in Dateinamen ersetzen
Klaus

Guten Morgen zusammen
Worti hatte mir gestern ein Makro geschrieben, um alle Dateien in einem Verzeichnis zu _ bearbeiten: Sub Alledateien_Bearbeiten() Dim strDatei As String Dim wb As Workbook 'Laufwerk und Pfad anpassen ChDrive "D" ChDir "D:\data\" strDatei = Dir("D:\data\*.xls") Do Whi...
30.10.2009 11:42:24
Thread-ID: 1113292
10 Beiträge
Text ab einer bestimmten Stelle löschen +Hyperlink
Werner

Hallo,
ich habe in Excel in einer Spalte (Spalte D) unter einander sehr viele Zeilen nach folgenden Schema
(Hinweis: Ich habe das h am Anfang hier weggelassen, weil der Beitrag sonst immer als Hyperlink dargestellt wird, in meiner Tabelle ist es vorhanden):
ttp://www.ihrname.de*dfg...
05.12.2009 23:35:56
Thread-ID: 1122006
3 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
13
3
5
14
12
2
7
3
9
2
3
3
6
11
3
2
11
9
1
2
2
10
2
3
1