Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 16:39:00
ältere VBA Codes automatisch neu strukturieren
20.04.2024 16:36:42
Arbeitsblatt Script auslagern in Modul
20.04.2024 16:28:25
zwei Makro in einem zusammenführen?
20.04.2024 15:30:14
Warum Verweis zeigt Falsch an
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
688to692
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
688to692
688to692
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlenreihe vorhanden in Liste

Zahlenreihe vorhanden in Liste
31.10.2005 08:36:44
helena
Guten Morgen
ich habe Macro funktioniert prinzipell
For Each Z In ActiveSheet.Columns(4).SpecialCells(xlCellTypeConstants, 3)
Select Case Z.Text
Case "52684...."
Inst = "G"
in Spalte stehen Telefonnummern, möchte nicht nur bei exakter übereinstimmung
sondern auch wenn diese 5 Zahlen im Inhalt sind
also 41526841111 beinhalten Zeichenfolgen ebenso 52684... beinhaltet
die Zeichenfolge
DANKE für Hilfe
helena

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlenreihe vorhanden in Liste
31.10.2005 08:49:16
Heiko S.
Hallo Helena,
deine Infos sind ja ein wenig dürftig, aber wenn du prüfen willst ob irgendwo 52684 drin ist dann könnte das so gehen.


Sub suchen()
Dim z
For Each z In ActiveSheet.Columns(4).SpecialCells(xlCellTypeConstants, 3)
If InStr(z.Text, "52684") Then
MsgBox z.Text
End If
Next z
End Sub

Gruß Heiko

PS: Rückmeldung wäre nett !
AW: Zahlenreihe vorhanden in Liste
31.10.2005 08:56:12
helena
HAllo Heiko
hier ist komplette Makro, ich muss einfach aus Zahlenreihe genauer gesagt
Telefonnummer die Kostenversursacher zuteilen, d.h. wenn in Telefonnummer
00451235268400 steht in Spalte 8 Wert eintragen, suche immer 5 Zeichen
gleiche ZAhl kann auch dastehen ohne Vorwahl 1235268400


Sub vorwahl()
Dim Z As Range, Inst$
On Error Resume Next
For Each Z In ActiveSheet.Columns(4).SpecialCells(xlCellTypeConstants, 3)
Select Case Z.Text
Case "52864"
Inst = "Privat"
Case "2"
Inst = Test
'Case ..
Case Else
Inst = ""
End Select
If Inst <> "" Then Z.Offset(0, 5).Value = Inst
Next
End Sub

Hoffe jetzt klarer
gruss helena
Anzeige
AW: Zahlenreihe vorhanden in Liste
31.10.2005 09:12:04
Heiko S.
Hallo Helena,
da kommst du wohl um ne If Then ElseIF und Else Anweisung nicht herrum, da man, meines Wissen in Select Case nur einfache Vergleichsoperatoren einbauen kann aber keine InStr LIKE ... Operatoren.

Sub vorwahl()
Dim Z As Range, Inst$
On Error Resume Next
For Each Z In ActiveSheet.Columns(4).SpecialCells(xlCellTypeConstants, 3)
If InStr(Z.Text, "52684") Then
Inst = "Privat"
ElseIf Z.Text = "2" Then
Inst = "Test"
'Elseif ...
Else
Inst = ""
End If
If Inst <> "" Then Z.Offset(0, 5).Value = Inst
Next
End Sub



Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: Zahlenreihe vorhanden in Liste
31.10.2005 09:27:47
helena
Hallo Heiko
leider noch nicht, wenn vor den 5 Zahlen noch die Ländervorwahl
steht geht es nicht. HAt es am Ende noch ein paar Zahlen auch
TIPTOP. Die im Beispiel 5 Zeichen sind immer zusammenhängend
aber nicht immer an der gleichen Stelle in der Zahlenfolge
52648 so gehts
004952648 so nicht
52648237 so gehts
DANKE für Deine HIlfe

gruss helena
AW: Zahlenreihe vorhanden in Liste
31.10.2005 09:38:38
Heiko S.
Hallo Helena,
bei mir geht´s mit allen drei Zahlen von dir 52648, 004952648 und 52648237.
Aber was suchst du denn nun 52648 oder 52684 ??? !!!

Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: Zahlenreihe vorhanden in Liste
31.10.2005 09:57:02
helena
Hallo Heiko
Sorry jetzt gehts, denke ich habe mich verschrieben beim testen
DANKE
gruss aus sonniger CH
helena

308 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
Zeichenkette in einer Zellesuchen
Gordon

Moin,
ich habe in einer Zelle (A1) einen Namen plus ein Datum dazu stehen: "Max Mustermann (01.01.1900)"
Nun möchte ich überprüfen, ob diese Zeichenkette, also Name plus Datum, nochmals in der Zelle A2 steht.
In der Zelle A2 stehen mehrere dieser Zeichenketten. Diese sind in einer...
26.09.2008 12:54:00
Thread-ID: 1012601
4 Beiträge
in spalte müssen 2 gleiche zahlen vorh. sein ...
Jessi

hallo zusammen,
suche nach einem makro, dass in spalte A überprüft ob von den dort geschriebenen zahlen jeweils zwei gleiche vorhanden sind. es geht um eine doppelbelegung eines zimmers. die zahl ist die zimmer-nr.
wäre z.b. nur einmal eine zahl in der spalte, wäre es möglich in das jew...
04.10.2008 15:33:00
Thread-ID: 1014154
5 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
Eine Zahl mit vorhandener Zahlenliste vergleichen
Niklas

Hallo Leute!
Es geht darum, eine eingegebene Zahl mit einer vorhandenen Zahlenliste vergleichen und die beiden nächstgelegenen Zahlen der Zahlenliste verwenden!
zur veranschaulichung:
ich habe die die zahlenliste : 1 , 2, 3, 4, 5, 6, 7
der eingegebene Wert ist z.B 1.5 dann soll...
17.10.2008 09:49:22
Thread-ID: 1017045
8 Beiträge
vorgegebene Summe aus Zahlen berechnen
mArsupiLami

Moin!
Ich benötige um regelmäßige Fehlerkorrekturen laufen zu lassen ein Script, dem ich eine Summe vorgebe und eine Range aus Zahlen (von mir aus Zellen A:A), das mir die Zusammenstellung aus Zahlen berechnet, die meine gesuchte Summe ergeben (Noch besser: Alle Kombinationen aus der Zahlen...
21.11.2008 11:25:35
Thread-ID: 1026668
6 Beiträge
Zelle des erstes Vorkommen eines Zeichens ausgeben
-s

Hallo Forum,
ich habe in Zeile 1 in jeder Spalte einen Buchsteben stehen:
a|b|c|c|c|e|
Wie kann ich die Zelle ausgeben lassen, in der beispielsweise das "c" das erste mal vorkommt? Als Ergebnis soll dann C1 ausgegeben werden.
Besten Dank!
-s
07.12.2008 21:32:00
Thread-ID: 1030929
4 Beiträge
Autofilter - Anzahl vorh. Sätze
KViertel

Hallo in die Runde,
In einem Tabellenblatt wird In VBA ein Autofilter gesetzt. Die dabei angezeigten Sätze sollen in ein anderes Tabellenblatt kopiert werden. Wenn jetzt keine Sätze vorhanden sind, wird die Sub abgebrochen. In der Recherche habe ich einen Hinweis zu Subtotal gefunden, weiß...
11.12.2008 11:45:00
Thread-ID: 1031999
3 Beiträge

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
11
3
4
3
4
7
5
3
2
4
2
2
5
2
7
11
2
4
4
3
4
5
10
2