Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1176to1180
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
1176to1180
1176to1180
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Säubern und die letzten 5 Zeichen prüfen

VBA Säubern und die letzten 5 Zeichen prüfen
Sebastian
Hallo,
ich habe mal eine kurze Frage,
ich hole mir mithilfe von Sendkeys (STRG+C) Anweisungen einen Link aus dem IE
Jetzt würde ich gerne in VBA überprüfen, ob die letzten 5 stellen des Links = 5000 ist.
In Excel selber mach ich das so…
K38 hier wird der Link hinkopiert
K39 =säubern(K38) (Damit das Sonderzeichen am ende des Links weg ist)
K40 =RECHTS(K40;5)
Kann ich das auch in VBA Realisieren, damit ich das nicht immer alles Zwischenspeichern muß?
Besten dank im Voraus
Sebastian
AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:02:50
EvilRik
Hallo Sebastian, 

Sub Link()
Dim Link As String
Link = "htttp:\\jkfvdfv5000.de\"
If Link Like "*5000*" Then MsgBox "Gefunden"
End Sub

Gruß Henrik
AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:09:06
Sebastian
mmh,
das ist schonmal ein Anfang.
Gibts in VBA die Funktion "Säubern"?
Gruß
AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:15:48
andy007
Hallo Sebastian wie wärs hiermit ,wenn Du tatsächlich die letzten 4 Stellen des links prüfen möchtest.
Sub Link()
Dim Link As String
Link = "http:\\blablabla.de?me=5000"
If Right(Link, 4) = "5000" Then
MsgBox "Gefunden"
End If
End Sub

Gruß,
Andreas
Anzeige
AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:16:04
Hajo_Zi
Hallo Sebastian,
Application.WorksheetFunction.Clean ()

AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:19:12
EvilRik
Hallo Sebastian,
hier nochmal korrigiert.
Das erste Makro liefert auch "Gefunden", wenn 5000 nicht an vorletzter Position im Link.
Ja, säubern gibt's. Aber warum möchtest du säubern? =CLEAN()
Diese Befehle erhälst du aber auch per Aufzeichnung mit dem Makrorekorder. 
Sub Link()
Dim Link As String
Link = "http:\\www.5000jkfvdfv5000\"
If Len(Link) - (InStrRev(Link, "5000", -1, vbTextCompare) + 3) = 1 Then MsgBox "Gefunden"
End Sub

Gruß Henrik
Anzeige
AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:32:43
Sebastian
Das ist alles super Jungs...
passt wunderbar..
Aber noch eine Frage!! wenn ich nciht weiß wie die letzten 5 Zeichen sind, wie kann ich mir die anzeigen lassen!?
=Right(Link,5) owT
09.09.2010 10:34:31
EvilRik
AW: VBA Säubern und die letzten 5 Zeichen prüfen
09.09.2010 10:35:35
Hajo_Zi
Hallo Sebastian,
Option Explicit 
Sub Link()
Dim Link As String
Link = "http:\\www.5000jkfvdfv5000\"
MsgBox Right(Link, 5)
End Sub

Gruß Hajo

304 Forumthreads zu ähnlichen Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 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
VBA FormulaArray nur 256 Zeichen
Werner

Hallo Zusammen,
ich möchte Formeln einer ziemlich umfangreichen Jahresarbeitsplanung in Excel, per VBA-Code korrigieren, da diese Datei(en) x-mal vervielfältigt und "beplant" sind. (über 100 Dateien mit mittlerweile über 28.000 Formeln je Datei)
Bei einer bestimmten Matrixformelgröße, ü...
25.10.2008 21:25:22
Thread-ID: 1019276
9 Beiträge
Anzeige
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
Ausgabe der ersten 4 Zeichen aus anderer Zelle
Eddie

Mahlzeit an alle,
habe wohl ne ganz einfache Sache .. ich suche ne kleine Formel, womit ich in A1 die ersten 4 Zeichen in der Zelle B1 wieder anzeige, also kopiert wird
Danke und gruß Eddie
05.01.2009 14:39:00
Thread-ID: 1036984
4 Beiträge
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
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
6
4
3
8
4
3
3
2
2
5
2
13
4
7
5
3
5
14
3
4
2
9
2
2
11