Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
24.04.2024 14:06:20
Gesamte Column löschen, wenn Column-Bereich leer
24.04.2024 13:44:05
Bezeichnung Tabellenblatt aus Zelle für Formel auslesen
24.04.2024 12:38:40
Formeländerung durch Wechsel von Excel 2021 auf 2019
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1492to1496
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
1492to1496
1492to1496
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mehrere URLs aus Zelle H3,H4,H5gleichzeitig öffnen

Mehrere URLs aus Zelle H3,H4,H5gleichzeitig öffnen
18.05.2016 14:55:10
Philipp
Hallo,
ich entwicklige gerade ein eigenes Preisvergleichs Tool weiter. Bisher bin ich noch größtenteils ohne VBA ausgekommen. Nun würde ich (wenn möglich) gerne das Tool weiter automatisieren. Hierfür werden aber tiefergehende VBA Kenntnisse gefragt.
Meine Idee ist es URLs, die zur Zeit in Zelle H10:H16 stehen gleichzeitig zu öffnen. Bestenfalls im selben Browser in unterschiedlichen Tabs. Ist es auch möglich, dass zwischen dem öffnen der verschiedenen Tabs eine halbe Sekunde zeit vergeht bevor das nächste Tab sich öffnet?
Vielen Dank an Jedermann :)

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Internetlinks öffnen...
18.05.2016 15:30:18
Case
Hallo Philipp, :-)
prinzipiell so:
Option Explicit
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
Private Const SW_MAXIMIZE = 3&
Public Sub Main()
ShellExecute 0, "open", "http://www.office-loesung.de", vbNullString, vbNullString, SW_MAXIMIZE
Call Sleep(5000) '5 Sekunden
ShellExecute 0, "open", "https://www.herber.de/forum", vbNullString, vbNullString, SW_MAXIMIZE
Call Sleep(5000) '5 Sekunden
ShellExecute 0, "open", "https://www.google.de", vbNullString, vbNullString, SW_MAXIMIZE
Call Sleep(5000) '5 Sekunden
ShellExecute 0, "open", "http://www.vbanet.blogspot.de", vbNullString, vbNullString,  _
SW_MAXIMIZE
End Sub
Public Sub Main_1()
Dim lngTMP As Long
For lngTMP = 10 To 16
ShellExecute 0, "open", Cells(lngTMP, 8).Text, vbNullString, vbNullString, SW_MAXIMIZE
Call Sleep(5000) '5 Sekunden
Next lngTMP
End Sub
Public Sub Main_2()
Dim lngTMP As Long
For lngTMP = 10 To 16
ActiveWorkbook.FollowHyperlink Cells(lngTMP, 8).Text
Call Sleep(5000) '5 Sekunden
Next lngTMP
End Sub
Im ersten Beispiel siehst Du wie es grundsätzlich funktioniert und im zweiten Code werden Links die in H10:H16 stehen geöffnet. Im dritten Beispiel wird die "FollowHyperlink-Methode" genutzt.
Servus
Case

Anzeige
AW: Internetlinks öffnen...
18.05.2016 17:36:38
Philipp
Ein fettes MERCI dafür !

300 Forumthreads zu ähnlichen Themen

mehreren Zellen in einer Zelle mit Absätzen
Christian

1. Ist es möglich, die markierten Zeilen von Screenshot 1 per Formel/Makro so zu übernehmen, das diese wie in Screenshot 2 übernommen werden? Solche Felder kommen aber öfters und auch mit einzelnen Zeilen dazwischen vor. Die Formatierung (bei Zahlen mit ,00 soll ein langer Strich stehen) sollte...
28.11.2008 15:53:49
Thread-ID: 1028725
3 Beiträge
Anzeige
mehrere Rechenoperationen in einer Zelle
marc

Hallo,
ich nehme eine Umrechung in Excel vor. Diese besteht aus 6, nacheinander ablaufenden, Rechenschritten.
1. Wert/255
2. WENN(Wert aus 1 größer 0,0405;(Wert aus 1+0,055/1,055)^2,4;(Wert aus 1/12,92))
3. Wert aus 2*100
4. 0,6502043*Wert aus 3+0,1780774*X2+0,1359384*X3...
20.05.2009 14:16:29
Thread-ID: 1076371
8 Beiträge
Max.Wert mehrerer Werte in einer Zelle
Peter

Hallo Forum,
wer kann helfen?
In einer Zelle sind (5 numer. Werte) gespeichert und duch ein
Semikolon getrennt. Die Zelle kann auch Leerstrings enthalten.
z.B. 4;33;;52;12
Ich möchte den max. Wert an die Textbox 'TxtAltKWo1'
übergeben.
Danke Peter
'Zellinhalt (5...
07.11.2009 20:59:50
Thread-ID: 1115285
3 Beiträge
Anzeige
Inhalt mehrerer Zellen in einer Zelle vereinen
flo

Hallo zusammen,
ich habe folgendes Problem:
Ich habe in einer Spalte viele Zellen mit Text. Die gesamten Zellen möchte ich nun in einer Zelle vereinen.
Weiß zufällig jemand wie ich das mache? Wenn ich die Zellen nur verbinde klappt das nicht, da die Inhalte dann gelöscht werden?!
01.02.2010 15:43:48
Thread-ID: 1134874
6 Beiträge
Mehrere kriterien in einer Zelle
Gallier1

Hallo
habe folgendes problem:
A1 =WENN(UND(A8=O$1;T8<=10000;U8<=10000;<b>C8="C"oder"B"oder"A</b>");O$3;"")
Der Fett dargestellte Bereich stimmt nicht in meiner Formel. Ohne diesem Bereich funktioniert sie problemlos (Dank des UMFANGREICHEN Forums) In C8 gibt es...
11.08.2010 16:15:53
Thread-ID: 1171752
11 Beiträge
mehrere werte in einer Zelle
knab

Hallo,
ich würde gerne in einer Zelle Ergebnisse aus mehreren zellen zusammenfassen.
Beispiel:
a1 = 30
a2= 40
a3 = 50
Ziel ist jetzt a4. Hier soll stehen 30,40,50
geht das und kann mir jemand die Formel hierfür geben.
Vielen Dank
16.09.2010 10:44:09
Thread-ID: 1178021
4 Beiträge
Mehrere WENN UND in einer Zelle
Dirk

Guten Morgen.
Wie bekomme ich diese einzelnen Formeln in eine Zelle?
=WENN(UND(C3=3;K2<36);"130 €")~f~
~f~=WENN(UND(C3=3;K2>35;K2<48);"145 €")~f~
~f~=WENN(UND(C3=3;K2>47;K2<61);"160 €")~f~
~f~=WENN(UND(C3=3;K2>60);"175 €")~f~
~f~=WENN(UND(C3=10;K2<36...
19.04.2011 10:00:43
Thread-ID: 1211010
5 Beiträge
Hyperlinks in EINER Zelle
sancez


Hallo,
warum gehen die Hyperlinks die ich in Spalte A einsetze über die anderen Zellen hinaus.
Ich möchte sie nur in Spalte A haben auch wenn Sie zu lang sind.
Wenn ich in die benachbarte Zelle B ein Punkt setze klappt das zwar...aber in Spalte B muss ich mit Markierungsfarben...
04.08.2011 10:43:09
Thread-ID: 1224853
8 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
2
6
7
2
1
5
10
3
4
7
4
4
7
5
5
12
5
6
11
12
2
11
3
3
7