Sostituire testo collegamento

Hai un problema con Excel?

Nuova discussione

Sostituire testo collegamento
di Andrea (utente non iscritto) data: 06/02/2014 17:36:25
Buonasera ragazzi, esiste un modo per sostituire nella stringa dei collegamenti ipertestuali il numero 2013 con 2014? Lo devo fare per circa 2000 collegamenti
es FEBBRAIO%202013APRI%200207.pdf
con FEBBRAIO%202014APRI%200207.pdf
Grazie

Trovare e Copiare Numeri Doppi
di Kirotta (utente non iscritto) data: 06/02/2014 17:46:14
Ciao a tutti
Stò seguendo i passi di un esercizio.

In un foglio di excel inserisco dei numeri nella colonna B da form tramite una casella di testo collegata a un pulsante
Questi numeri vengono inseriti a uno a uno quindi può capitare che in B ci siano due numeri
Io vorrei che appena inserisco un numero già presente oltre ad apparire in B venga copiato anche in un'altra colonna ad es L nella stessa riga del numero doppione (quindi se inserisco in B 1 2 3 poi 2 il due è presente quindi 2 lo copio ad es in L5)

In P5 perchè io inizio l'inserimento in B partendo da B2

Se inserisco un altro numero già presente oltre ad apparire in B venga copiato anche nella colonna M (sempre nella stessa riga del numero doppione)
Se inserisco un altro numero già presente oltre ad apparire in B venga copiato anche nella colonna N (sempre nella stessa riga del numero doppione)
E così via

Poi seguendo l'esempio precedente se i numeri successivi sono diversi da 2 sotto il numero 2 in L5 il programma deve inserirmi 1 2 3 4 ecc finchè non si ripresenta in B un 2 se questo succede in L nella stessa riga di questo 2 devo mettere un segno di riconoscimento se si può un pallino

Comunque x ora vorrei almeno capire come riconoscere il numero doppio e copiarlo.

Vi allego il mio progetto

Grazie

Questo è il mio codice di base ma non va

Dim LastRow As Long, K As Long
Dim Ncol1 As Integer

    Application.ScreenUpdating = False

    With ActiveSheet

        LastRow = [COUNTA(B:B)]
        For Ncol1 = 12 To 22
            For K = LastRow To 2 Step -1
                If .Cells(K, 2) = .Cells(K - 1, 2) Then
                    Sheets(1).Cells(Ncol1, Ncol1) = Val(txtStart)
                End If
            Next
        Next
    End With
  
    Application.ScreenUpdating = True
End Sub

di patel data: 06/02/2014 19:19:10
Kirotta
apri una discussione tua, non è corretto accodarsi alle discussioni altrui
di Kirotta data: 06/02/2014 19:26:39
Scusa Patel ma io avevo premuto il tasto nuova discussione Bò ora riprovo

Grazie x l'avvertimento
di Grograman (utente non iscritto) data: 06/02/2014 19:27:24
CTRL+SHIFT+T detto anche "trova e sostituisci"!

Fai trova: FEBBRAIO%202013
Sostituisci con: FEBBRAIO%202014
di Vecchio Frac data: 06/02/2014 21:05:30
cit. "ma io avevo premuto il tasto nuova discussione"
---> A volte accade che mentre l'utente sta scrivendo la propria nuova discussione un altro utente ne apre una diversa e il sistema attribuisce lo stesso ID discussione ai due post che quindi confluiscono nel medesimo thread. Il problema è già noto al nostro Amministratore. Per il momento l'unica cosa da fare è assicurarsi di aver iniziato una discussione propria.

Vuoi Approfondire?