Kopieren tabblad met hyperlinks

Question

Dag,

In excel heb ik een sjabloon gemaakt wat gaat dienen als een overzicht voor projecten. Daarbij heb ik knoppen gemaakt met hyperlinks. Deze knoppen met hyperlinks verwijzen naar bepaalde cellen in het betreffende werkblad.

Nu kom ik erachter dat wanneer ik het betreffende werkblad kopieer de koppelingen verwijzen naar het originele blad. Laten we bijvoorbeeld het originele werkblad 'sjabloon' noemen en het gekopieerde werkblad 'kopie sjabloon'. In mijn 'kopie sjabloon' verwijzen de knoppen/hyperlinks naar mijn werkblad 'sjabloon'. Dat is niet mijn bedoeling. Ik heb getracht dit op te lossen door te werken met een macro welke de hyperlinks juist moet leggen. Ook deze optie werkt niet. Ik krijg hierbij een foutmelding bij het uitvoeren van de macro.

Heeft iemand hiervoor een oplossing?

Answer 1

JV,

Aangenomen dat je 'knoppen' met hyperlinks cellen zijn waarin een hyperlink is geplaatst m.b.v. Invoegen>Koppeling, zou iets als onderstaande macro (in een algemene module) je hyperlinks in de gekopieerde bladen in de gewenste richting kunnen aanpassen:

Sub RewriteHyperlinks() 

    Dim sh As Worksheet 

    Dim rngC As Range 

    For Each sh In ThisWorkbook.Worksheets 

        If sh.Name <> "Sjabloon" Then 

            For Each rngC In sh.UsedRange 

                If rngC.Hyperlinks.Count > 0 Then 

                    If rngC.Hyperlinks(1).Type = msoHyperlinkRange Then 

                        If InStr(rngC.Hyperlinks(1).SubAddress, "Sjabloon!") > 0 Then 

                            rngC.Hyperlinks(1).SubAddress = Replace(rngC.Hyperlinks(1).SubAddress, "Sjabloon", "'" & sh.Name & "'") 

                        End If 

                    End If 

                End If 

            Next 

        End If 

    Next 

End Sub 

Let wel, alle hyperlinks die verwijzen naar blad 'Sjabloon' krijgen hierdoor een verwijzing naar het eigen werkblad.

Is mijn aanname onjuist dan is het handig om de aansporing van aalpha op te volgen.

Jan

Answer 2

Geef eens 1 of enkele voorbeelden van zo'n hyperlink en vermeld de code van je macro, dan is er misschien iets zinnigs over te zeggen.