Aprire automaticamente più url



  • Aprire automaticamente più url
    di Angy91 data: 07/06/2016 21:02:30

    Salve ho un piccolo problema,sicuramente di facile risoluzione, ma non riesco a trovare la soluzione. Faccio un esempio nella cella A1 ho l'indirizzo web di una pagina '://ww.......it/#q=' , nella colonna B ho dei valori
    B4: ciao
    B5: ok
    B6: si

    nella cella C4 metto la formula =COLLEG.IPERTESTUALE(CONCATENA(A$1;B4))
    C5 metto la formula =COLLEG.IPERTESTUALE(CONCATENA(A$1;B5))
    C6 metto la formula =COLLEG.IPERTESTUALE(CONCATENA(A$1;B6))

    il risultato sarà google al posto dei puntini
    '://ww.......it/#q=ciao'
    '://ww.......it/#q=ok
    '://ww.......it/#q=si'

    adesso il problema è che voglio aprire tutti questi link automaticamente. Io ho provato a fare un codice vba ma mi da errore. Per favore potete aiutarmi?
    Oltretutto i valori della colonna B e quindi il risultato della C cambiano spesso. Grazie in anticipo per le risposte

     
    Sub Pulsante4_Click()
    
     Sheets("Spedizioni").Select
        riga = 8
        colonna = 12
    
    Do While Cells(riga, colonna) <> ""
        
        Cells(riga, colonna).Select
        Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
       
        riga = riga + 1
        
    Loop
    End Sub


  • per evitare spam
    di Angy91 data: 07/06/2016 21:04:26

    Non ho messo l'indirizzo completo per evitare spam. ma prima dei : c'è scritto htt.ps e nei puntini google



  • di patel data: 07/06/2016 21:50:50

    se alleghi un file di esempio ci risparmi di ricrearne uno simile