Modifica massiva collegamenti Excel (RISOLTO)

Anonimo
2020-01-22T10:20:25+00:00

Salve,

in seguito ad un salvataggio automatico tutti i collegamenti ipertestuali delle celle di una singola colonna ora puntano ad un nuovo percorso "...**AppData\Roaming\Microsoft\Excel**Ordini\Cliente X".

premetto che ho provato moltissime  macro che ho trovato nei vari forum ma senza risolvere nulla.

Avrei bisogno di una macro efficace che mi consenta di cambiare tutti i percorsi dei collegamenti delle celle della prima colonna del foglio da

"C:....\appdata\roaming\microsoft\Excel\Ordini\Cliente X"  

a

"C:...percorso_originale\Ordini\Cliente X"

A dire il vero la mia soluzione ideale sarebbe una macro che assegna a ciascuna cella della colonna 1 ( la prima) un collegamento ipertestuale il cui percorso è :

"C:.........\cella(y;5)\cella(y;1)"

dove ovviamente la cella (y;5) o (y;1) sono le celle della medesima riga ma della colonna 1 e 5 il cui nome coincide con cartella e sottocartella finale del collegamento.

Ho provato infatti una prima macro e funziona ma il percorso si ferma al contenuto della prima cella e mi manca la seconda da aggiungere come sottocartella.

Excel 2013/Windows10

Grazie in anticipo a chi mi vorrà aiutare.

Microsoft 365 e Office | Excel | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

1 risposta

Ordina per: Più utili
  1. Anonimo
    2020-02-25T15:47:35+00:00

    ho risolto da solo, grazie ( di nulla).

    Per chi fosse interessato la macro per generare automaticamente collegamenti ipertestuali dai contenuti celle excel è la seguente:

    in particolare questa macro crea  su ciascuna cella della prima colonna diversi hyperlink a seconda del contenuto delle rispettive celle alla colonna X e Y ed a partire da un percorso "root" a piacere ( ad es. C:\percorso_personale) :

    Sub Macro1()

    '

    ' Macro1 Macro

    For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1

    Cells(i, 1).Hyperlinks.Add Anchor:=Cells(i, 1), Address:="c:\percorso_personale" & Cells(i, x).Value & "" & Cells(i, y) _

    , TextToDisplay:=Cells(i, 1).Text

    Next

    End Sub

    dove X e Y sono appunto il nr. colonna delle celle avente come nome quello delle rispettive sottocartelle.

    La risposta è stata utile?

    7 persone hanno trovato utile questa risposta.
    0 commenti Nessun commento