Thema Datum  Von Nutzer Rating
Antwort
25.07.2018 21:36:34 Max
NotSolved
Blau Hyperlink Schleife
25.07.2018 22:08:03 Gast15940
NotSolved
25.07.2018 22:14:43 AlterDresdner
Solved
25.07.2018 22:17:15 AlterDresdner
NotSolved
26.07.2018 00:17:52 Max
NotSolved
26.07.2018 21:23:42 AlterDresdner
NotSolved
27.07.2018 20:08:05 Gast14331
Solved
30.07.2018 17:11:34 AlterDresdner
Solved

Ansicht des Beitrags:
Von:
Gast15940
Datum:
25.07.2018 22:08:03
Views:
545
Rating: Antwort:
  Ja
Thema:
Hyperlink Schleife
Sub max()
Dim WS As Worksheet: Set WS = ActiveSheet
With WS.Hyperlinks
    For i = 2 To 77
        For j = 0 To 2
            Z = Z + 1
            adr = "..\..\Bilder\Prüfung%200001\" & i - 1 & "%20Datail%" & _
                200 + Z & ".jpg"

            .Add Cells(i, 8 + j), adr, , , CStr(Z)
        Next j
    Next i
End With
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
25.07.2018 21:36:34 Max
NotSolved
Blau Hyperlink Schleife
25.07.2018 22:08:03 Gast15940
NotSolved
25.07.2018 22:14:43 AlterDresdner
Solved
25.07.2018 22:17:15 AlterDresdner
NotSolved
26.07.2018 00:17:52 Max
NotSolved
26.07.2018 21:23:42 AlterDresdner
NotSolved
27.07.2018 20:08:05 Gast14331
Solved
30.07.2018 17:11:34 AlterDresdner
Solved