Met vba snelkoppelingen maken voor Windows Verkenner

[Senso]

Graag zou ik een groot aantal snelkoppelingen willen maken met vba. Zie voorbeeld.
De doel/bestemmingsmap zou E:\test\ kunnen zijn.

Bekijk bijlage Excel vba - Met vba snelkoppelingen maken.xlsx

 

[AccessGuru]

Kwestie van de macro opnemen (met een bestandje als voorbeeld), en daarna de verwijzing naar het bestand weghalen. Dus dit:

Sub mcrSnelkoppelingMap()
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
        "E:\Downloads\PowerShell-7.1.4-win-arm64\Microsoft.PowerShell.ConsoleHost.xml" _
        , TextToDisplay:="E:\Downloads\"
End Sub

wordt dan dit:

Sub mcrSnelkoppelingMap()
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="E:\Downloads\PowerShell-7.1.4-win-arm64\", TextToDisplay:="E:\Downloads\"
End Sub

Dan heb je het idee denk ik wel .

 

[snb]

In jouw bestand:

Sub M_snb()
   Columns(5).Replace "http", "Hyperlink(""http"
   Columns(5).Replace "php", "php)"
   Columns(5).Replace ".nl*", ".nl)"
   Columns(5).Replace "Hyperlink", "=Hyperlink"
End Sub

 

[Senso]

Ik heb een beter voorbeeld geplaatst.
Bekijk bijlage Excel vba - Met vba snelkoppelingen maken_2.xlsx

 

[emields]

bedoel je dan zoiets?

 

[Senso]

Oké, het is gelukt. Van de 145 totaal 139 gelukt. Het zijn altijd de spaties. / etc. die de zaak onderbreken. Dus kost tijd. Zal die van jouw bewaren en later proberen. Waar ik nu mee uitgevoerd heb, was een code van Edmoor.