Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Webadresse nach Eingabe in Excel syntaktisch überprüfen

Frage Microsoft Microsoft Office

Mitglied: Rene1976

Rene1976 (Level 2) - Jetzt verbinden

05.08.2014, aktualisiert 06.08.2014, 1767 Aufrufe, 3 Kommentare

Hallo,

weiß jemand wie man eine Webadresse nach Eingabe (beim verlassen der Zelle) in einer Excel 2010 Zelle auf syntaktische Richtigkeit überprüfen kann?
Es gibt anscheinend keine Standarddatentyp wie Zahl oder Datum in Excel dafür.

Ich dachte da z.B. an Regular Expression wenn es nicht etwas "out of the box" gibt, aber wo gebe ich diese ein?

Es gibt ein Eingabefeld unter Datenprüfung --> Benutzerdefiniert.

Ist das die richtige Stelle oder gibt es ein bessere Lösung?

Oder muss man das wieder mit VBA machen?

Gruß,

Rene
Mitglied: colinardo
LÖSUNG 05.08.2014, aktualisiert 06.08.2014
weiß jemand wie man eine Webadresse nach Eingabe (beim verlassen der Zelle) in einer Excel 2010 Zelle auf syntaktische
Richtigkeit überprüfen kann?
Ich dachte da z.B. an Regular Expression wenn es nicht etwas "out of the box" gibt, aber wo gebe ich diese ein?
Es gibt ein Eingabefeld unter Datenprüfung --> Benutzerdefiniert.

Ist das die richtige Stelle oder gibt es ein bessere Lösung?
das geht damit nicht, dazu ist eine Webadresse zu komplex für den billigen Dialog
Oder muss man das wieder mit VBA machen?
yip, REGEX is always your friend

Folgendes checkt z.B. den Bereich A1:A100 auf die Syntax einer Webadresse nach Änderung des Zelleninhaltes:
(Code einzufügen im Codeabschnitt des jeweiligen Arbeitsblattes auf dem die Überprüfung stattfinden soll.)
01.
Function CheckSyntax(ByVal rngTarget As Range) As Boolean 
02.
    Set regex = CreateObject("vbscript.regexp") 
03.
    regex.IgnoreCase = True 
04.
    regex.Pattern = "^https?://[\-A-Z0-9+&@#/%?=~_|$!:,.;]*[A-Z0-9+&@#/%=~_|$]$" 
05.
    If Not regex.Test(rngTarget.Value) Then 
06.
        CheckSyntax = False 
07.
    Else 
08.
        CheckSyntax = True 
09.
    End If 
10.
    set regex = Nothing 
11.
End Function 
12.
 
13.
Private Sub Worksheet_Change(ByVal Target As Range) 
14.
    'Range bei dem eine Änderung etwas bewirken soll 
15.
    Set changeRange = ActiveSheet.Range("A1:A100") 
16.
    If Not Application.Intersect(changeRange, Target) Is Nothing Then 
17.
        If Not CheckSyntax(Target) Then 
18.
            MsgBox "Die Webadresse hat die falsche Syntax", vbCritical 
19.
            Application.EnableEvents = False 
20.
            Target.Value = "" 
21.
            Application.EnableEvents = True 
22.
        End If 
23.
    End If 
24.
End Sub
Den Regex kannst du ja nach deinem Gusto gestalten, bzw. erweitern (er stellt keinen Anspruch auf Vollständigkeit).

Grüße Uwe
Bitte warten ..
Mitglied: Rene1976
06.08.2014 um 14:17 Uhr
Hi Uwe,

vielen Dank für die schnelle Hilfe.
Der Code funktioniert.

In Zeile 5 muss aber das "not" entfernt werden.

If Not regex.Test(rngTarget.Value) Then

Deine Regex funktioniert leider noch nicht bei allen Varianten.
Werde sie bei Gelegenheit ändern wenn ich hier eine passenden gefunden habe.
http://regexlib.com/Search.aspx?k=url

Eine Regex für alle Konstellationen einschließlich von neuen TLD zu finden oder zu schreiben wird immer schwerer

Besten Dank.

Rene
Bitte warten ..
Mitglied: colinardo
06.08.2014, aktualisiert um 14:35 Uhr
Zitat von Rene1976:
In Zeile 5 muss aber das "not" entfernt werden.
nö, wieso ?? Das hat schon seine Richtigkeit.

Deine Regex funktioniert leider noch nicht bei allen Varianten.
habe ich auch nicht behauptet Eine Adresse kann z.B. auch so aussehen http://localhost. Kommt halt immer drauf an worauf du Priorität setzt oder welche Art Adressen bei dir verwendet werden sollen.
Ein Regex der alle Eventualitäten matcht, wird sooooooooooooooooooooooooooooo lang
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Batch - Eingabe überprüfen
gelöst Frage von JantlemanBatch & Shell5 Kommentare

Hallo Community, ich beschäftige mich seit einigen Tagen mit Batch und habe beschlossen einen einfachen Sleeptimer zu programmieren. Bis ...

Batch & Shell
"goto" kann syntaktisch an dieser Stelle nicht verarbeitet werden
gelöst Frage von Y4nn1ckBatch & Shell14 Kommentare

Morgen, ich schreibe gerade an einem Zufallsgenerator für die Klasse, also an einem, der auswählt, wer dran kommt. Ich ...

Microsoft Office
Excel - Aufzählung aller, mit der Eingabe, übereinstimmenden Zellen
Frage von tomaschkuMicrosoft Office4 Kommentare

Hallo alle Zusammen! Ich habe eine Excel Datei mit einer Tabelle wo eine Liste ist, die sich über 2 ...

Datenbanken
Import von excel in Datenbank auf Richtigkeit überprüfen
Frage von checknerDatenbanken

Hallo zusammen, vorab, ich bin Softwaretester und habe absolut keinen Plan von Entwicklung - ich habe nur vor folgendes ...

Neue Wissensbeiträge
Apple

IOS 11.2.1 stopft HomeKit-Remote-Lücke

Tipp von BassFishFox vor 1 TagApple

Das Update für iPhone, iPad und Apple TV soll die Fernsteuerung von Smart-Home-Geräten wieder in vollem Umfang ermöglichen. Apple ...

Windows 10

Windows 10 v1709 EN murkst bei den Regionseinstellungen

Tipp von DerWoWusste vor 1 TagWindows 10

Dieser kurze Tipp richtet sich an den kleinen Personenkreis, der Win10 v1709 EN-US frisch installiert und dabei die englische ...

Webbrowser

Kein Ton bei Firefox Quantum über RDP

Tipp von Moddry vor 1 TagWebbrowser

Hallo Kollegen! Hatte das Problem, dass der neue Firefox bei mir auf der Kiste keinen Ton hat, wenn ich ...

Internet

EU-DSGVO: WHOIS soll weniger Informationen liefern

Information von sabines vor 1 TagInternet4 Kommentare

Wegen der europäische Datenschutzgrundverordnung stehen die Prozesse um die Registrierung von Domains auf dem Prüfstand. Sollte die Forderungen umgesetzt ...

Heiß diskutierte Inhalte
Windows Server
RODC kann nicht aus Domäne entfernt werden
Frage von NilsvLehnWindows Server18 Kommentare

HAllo, ich arbeite in einem Universitätsnetzwerk mit 3 Standorten. Die Standorte haben alle ein ESXi Cluster und auf diesen ...

Hardware
Kein Bild mit nur einer bestimmten Grafikkarten - Mainboard Konfiguration
gelöst Frage von bestelittHardware18 Kommentare

Hallo zusammen, ich hatte schon einmal eine ähnliche Frage gestellt. Damals hatte ich genau das gleiche Problem. Allerdings lies ...

Netzwerkmanagement
Mehrere Netzwerkadapter in einem PC zu einem Switch zusammenfügen
Frage von prodriveNetzwerkmanagement16 Kommentare

Hallo zusammen Vorweg, ich konnte schon einige IT-Probleme mit Hilfe dieses Forums lösen. Wirklich klasse hier! Doch für das ...

Hardware
Links klick bei Maus funktioniert nicht
gelöst Frage von Pablu23Hardware16 Kommentare

Hallo erstmal. Ich habe ein Problem mit meiner relativ alten maus jedoch denke ich nicht das es an der ...