Macro che sostituisce i valori

Versione Completa   Stampa   Cerca   Utenti   Iscriviti     Condividi : FacebookTwitter
pastaezucca
00giovedì 21 dicembre 2023 17:26
Buonasera,

ho un problemuccio con una macro creata con la funzione automatica.

Dovrebbe funzionare così:

Se lancio pulisci e poi genera, il contenuto va in errore ovviamente, se poi lancio FIX dovrebbe sostituire #RIF con i relativi fogli.

Ma non funziona nell'ultimo passaggio.... Qualcuno mi può aiutare?

Grazie!
Paolo
L2018
00giovedì 21 dicembre 2023 17:36
Re:
ciao,
manca il file, il file di esempio da esaminare
nTdQ231201
01giovedì 21 dicembre 2023 17:42
E si è meglio avere a disposizione il file così gli esperti potranno darti sicuramente una mano.
alfrimpa
00giovedì 21 dicembre 2023 17:45
Ma le risposte che hai ricevuto su Forumexcel.it non le tieni in considerazione?

Per chi volesse dare uno sguardo la discussione è questa

https://www.forumexcel.it/forum/threads/macro-che-sostituisce-i-valori.73103/
dodo47
00giovedì 21 dicembre 2023 18:29
diciamo che è Natale ......

Sarei comunque curioso di sapere il perchè hai fatto chiudere la discussione nell'altro forum, il suggerimento di Alfredo (ciao) era perfetto:

Sub FIXFORMULE()
Dim rng As Range, cel As Range, mData As Variant, pos As Integer
    Sheets("Foglio1").Activate
    Set rng = Range("C9:F9")
    For Each cel In rng
    If IsError(cel) Then
        pos = InStr(cel.Formula, "!")
        cel = "=" & "IVI!" & Mid(cel.Formula, pos + 1, Len(cel.Formula))
    End If
    Next
End Sub


Vale solo per il range C9:F9, per gli altri provvedi in autonomia.

NB:
ma perchè cancelli i fogli e li ricrei?, non basterebbe "pulirli"

saluti



alfrimpa
00giovedì 21 dicembre 2023 18:45
Re:
dodo47, 21/12/2023 18:29:

diciamo che è Natale ......

Sarei comunque curioso di sapere il perchè hai fatto chiudere la discussione nell'altro forum, il suggerimento di Alfredo (ciao) era perfetto:




perchè come di dice a Napoli si vuole "o cocc ammunnato e buono"

Non credo che da romano hai bisogno di traduzione
Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 11:26.
Copyright © 2000-2024 FFZ srl - www.freeforumzone.com