Variabele locatie in VBA waar gepubliceerd wordt

[novec]

Hallo

Ik wil een deel van een sheet publisheren in HTML.
De VBA code klopt
maar .....

ik wil de locatie waar de publicatie opgeslagen wordt uit een cel halen omdat elke gebruiker dan die locatie kan aanpassen.
Daarom heb ik een variabele gemaakt die naar de value van die cel verwijst.
Ook dat gaat goed maar hoe verwerk ik die variabele nu in de code?

Ik heb het nu zo

Sub publish()

' publish Macro

Dim opsl As String

    Application.Goto (ActiveWorkbook.Sheets("Bron").Range("h4"))
    opsl = ActiveCell.Value
    
    Worksheets("Jaarstand").Select
    Range("B4").Activate
    ActiveCell.CurrentRegion.Select
    
    With ActiveWorkbook.PublishObjects.Add(xlSourceRange, _
        [COLOR="#FF0000"]"opsl"[/COLOR], "Jaarstand", [COLOR="#FF0000"]"opsl"[/COLOR], _
        xlHtmlStatic, "Vissen", "")
        .publish (True)
        .AutoRepublish = False
    End With
    ChDir "D:\Users\Steven\Desktop"

End Sub

De fouten zitten in rode variabelen volgens mij want als ik er de locatie invul als geschreven tekst werkt hij el.

Steven

 

[edmoor]

Je hebt de variabele tussen " tekens gezet, dan is het geen variabele meer maar de vaste waarde "opsl".

 

[novec]

oh **** sorry
Ik had hem al gepost maar zag hem niet verschijnen en dacht dus dat ik iets fout had gedaan. Excuus ik zie net dat de originele post wel is gepubliceerd in het forum.

Excuus

Steven

 

[edmoor]

Geen probleem en het doet niets af aan mijn reactie.