Verstehen, wie man URLs mit Excel VBA Makros bearbeiten können Sie Zeichen löschen oder hinzufügen , um Web -Adressen in Ihre Arbeitsmappen . Sie können dieses Wissen nutzen , um gebrochen URLs zu beheben , ändern Sie eine URL -Display oder geben völlig neue URLs . Die "Formel" VBA Eigenschaft macht diese Bearbeitungen möglich . Sie können diese Eigenschaft auf den Namen eine der Funktionen unter Excel " Formeln" Registerkarte eingestellt . Da die Art des Inhalts von URLs ist eine Zeichenfolge , die Vertrautheit mit VBA String-Funktionen , wie z. B. "Ersetzen ", " Mid ", " Linke " und die Verkettung Operator " & " wird Sie bei der Bearbeitung URLs unterstützen. Anleitung
Ersetzen Charaktere
1
Klicken Sie auf das Menü "Datei" , klicken Sie auf "Optionen " und anschließend auf " Menüband anpassen . " Klicken Sie auf die "Entwickler "-Kästchen , und klicken Sie auf " OK ", um das Fenster "Optionen" zu schließen. Word zeigt die Registerkarte "Entwicklertools" .
2
Geben Sie die folgende Formel in eine beliebige Zelle in der aktuellen Arbeitsmappe . Diese Formel erzeugt einen Hyperlink URL in der aktiven Zelle .
= HYPERLINK ( " http://www.whitehouse.net " , "White House " )
3
Klicken Sie auf die Registerkarte "Entwicklertools" der " Visual Basic "-Taste , um die VBA-Programmierung Umwelt gelangen , dann fügen Sie das folgende Programm in das Fenster . Dieses Programm bearbeitet eine URL mit der VBA Funktion "Ersetzen" . Das erste Argument dieser Funktion ist die Zeichenfolge , in dem Sie einen Ersatz zu machen. Das zweite Argument ist der Text, den Sie ersetzen möchten, und das dritte Argument ist der Ersatz Text selber.
Public Sub editURL ()
Dim URL , url2
URL = ActiveCell . Formula
url2 = Replace (URL , "White House", " Oval Office " )
ActiveCell.Formula = url2
End Sub
4
Klicken Sie auf eine Anweisung im Programm , dann klicken Sie auf den " Run "-Menü den Befehl "Ausführen" , um das Programm auszuführen.
5
Klicken Sie auf den "Excel "-Symbol auf der Taskleiste, um zu Excel zurückzukehren. Beachten Sie, dass das " Oval Office " erscheint nun anstelle des ursprünglichen "White House " Text, unter Angabe Ihres Programms Bearbeitung der URL erfolgreich war.
Ersetzen Entire URL
6
Klicken Sie auf die Registerkarte "Entwicklertools" der " Visual Basic " -Taste, um die Rahmenbedingungen für die Schaffung VBA -Programme geben .
7
Verwenden Sie die Anweisungen von Schritt 2 des vorherigen Abschnitts , um eine beliebige URL in einem Arbeitsblatt eingeben Zelle. Geben Sie z. B. "= Hyperlink ( " http://www.whitehouse.gov "," The Oval Office " ) " .
8
Fügen Sie das folgende Programm in das Fenster . Dieses Programm erzeugt eine völlig neue URL in der aktiven Zelle .
Public Sub editURL ()
ActiveCell.Formula = " = Hyperlink (" " http://www.nea.gov " " "," National Endowment for the Arts "") " End Sub
9
Klicken Sie auf eine Anweisung im Programm , um das Programm zu wählen.
10
Klicken Sie auf den " Run "-Menü den Befehl "Ausführen" , um das Programm auszuführen. Bringen Sie den Excel durch Drücken von " Alt + F11 ". Das "White House " URL, die Sie in Schritt 2 eingegeben wird nun durch einen Link auf der Homepage des National Endowment for the Arts ersetzt.