Live-Forum - Die aktuellen Beiträge
Datum
Titel
08.05.2024 17:16:08
Randomize, RND, Timer() , (@Onur, Opawinni)
08.05.2024 16:47:59
Formel für 1, Ziffer nach einem Teilstring finden
08.05.2024 16:25:23
'Fehler in der Zwischenablage' beim Abspielen von Ma
08.05.2024 15:31:31
Excel schließt fälschlicherweise alle Workbooks obwohl
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
748to752
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
748to752
748to752
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ungültiges zeichen in string

ungültiges zeichen in string
27.03.2006 10:22:41
peter
Hi Leute,
ich hätte folgende Frage:
Ich frage über eine InputBox einen String ab der dann dazu benutzt wird einem Sheet seinen Namen zu geben! Jetzt würde mich interessieren wie ich es am einfachsten bewerkstelligen kann, dass die Fehlermöglichkeiten ausgeschlossen werden (d.h. 1. ein ungültiges Zeichen im String enthalten ist und 2. der String länger als 31 Zeichen ist).
Vielleicht kann mir jemand helfen!
Vielen Dank!
LG Peter

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ungültiges zeichen in string
27.03.2006 11:41:37
UweD
Hallo
so z.B.

Sub Eingabe()
Dim E$
Do
E = InputBox("Bitte Eingabe", "Frage")
If E = "" Then
Exit Sub
ElseIf Len(E) >= 31 Then
MsgBox "zu lang"
End If
Loop Until Len(E) < 31
E = Application.Substitute(E, "?", "_")
E = Application.Substitute(E, "*", "_")
E = Application.Substitute(E, "/", "_")
E = Application.Substitute(E, "\", "_")
E = Application.Substitute(E, ":", "_")
'usw
ActiveSheet.Name = E
End Sub

Gruß UweD
(Rückmeldung wäre schön)
AW: ungültiges zeichen in string
28.03.2006 00:37:06
peter
hi uwe,
vielen dank für deinen hinweis! habe mein problem gut damit lösen können!
schönen abend noch!
lg peter
Anzeige
AW: ungültiges zeichen in string
27.03.2006 12:49:47
Erich
Hallo Peter,
als Alternative noch ne Funktion, die bei ungültigen Blattnamen FALSE zurückgibt: 
Function BlattNam_Pruefung(BlaNam As String) As Boolean
If Len(BlaNam) < 1 Or Len(BlaNam) > 31 Then Exit Function
If Application.Evaluate( _
"=SUM((MID(""" & BlaNam & """,COLUMN(1:1),1)={"":"";""/"";""\"";""?"";""*"";""]"";""[""})*1)" _
) > 0 Then Exit Function
BlattNam_Pruefung = True
End Function

Ungültig sind außerdem geschützte (deutsche und englische) Bezeichnungen wie z. B. History. Näheres dazu findest du bei
http://www.xlam.ch/pos/rules.htm#Richtlinien%20f%FCr%20Arbeitsblatt-Namen
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: ungültiges zeichen in string
28.03.2006 00:35:30
peter
hi erich,
vielen dank für deinen beitrag! ich habe das problem vorher schon auf die weise die uwe mir vorgeschlagen hat gelöst!
habe jetzt gerade dein version ausprobiert! funktioníert super!
vielen dank nochmal!
lg peter
O.T. ! Stück = 1 sg ?
28.03.2006 01:20:05
Reinhard
Hallo Wissende,
das verstehe ich nun nicht (aus dem Link vom Erich):

Mass  	Masseinheit  	Bemerkung
Gramm 	g                 .
Kilogramm 	kg          .
Stück 	sg 	Abkürzung in Kleinbuchstaben schreiben.
"SG" ist die Abkürzung von "specific gravity" (Spezifische Dichte).

Wieso ist die Kurzform von "Stück" "sg" ?
Gruß
Reinhard
Anzeige

317 Forumthreads zu ähnlichen Themen

Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Anzeige
Unicode-Zeichen in Textfeld von Userform
Userform

Hallo,
Ich bin auf der Suche nach gut praktikablen Möglichkeiten in ein Textfeld eines Userforms Unicode-Zeichen (z.B. ć kleines c mit Akut - Code 0107 oder č kleines c mit Caron - Code 010D) einzutippen.
Danke im voraus für alle Tipps!
Grüße
Günther
12.10.2008 12:34:00
Thread-ID: 1015836
5 Beiträge
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
Anzahl der Zeichen in einer Zelle
Jan

Guten Morgen
Welcher Befehl zählt die Zeichen in einer Zelle?
Danke
Gruß Jan
07.01.2009 08:38:00
Thread-ID: 1037436
3 Beiträge
Nur bestimmte Zeichen in Zelle
wolle

Erstmal ein Hallo an Alle und alles gute in 2009!
Ich hätte folgende Frage:
Wie kann ich es machen, dass in Spalte B von Zelle B10 bis Zelle Bxx nur die Zeichen "J" "j" "N" "n" eingeben werden können und bei Eingabe eines anderen Zeichens ein kleines Popup erscheint, das den Bediener in...
09.01.2009 11:22:25
Thread-ID: 1038162
3 Beiträge
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 Beiträge
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
Tausenderzeichen in Textbox
Stefen

Hi Leute
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox1=Format(TextBox1,"#,##0.00") End Sub
eingebe sollte doch in Verbindung mit Controlsource in der TextBox die Tausenderzeichen stehen.
Warum geht das nicht.
Es zeigt mir immer nur den Betrag 50000...
31.01.2009 16:44:00
Thread-ID: 1045681
12 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

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
2
3
4
13
4
2
2
5
2
11
4
4
4
5
11
1
2
2
14
8
4
2
12
2
7