Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Gentilmente 2 Macro Filtra e Copia e Inserimento Righe

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Gentilmente 2 Macro Filtra e Copia e Inserimento Righe

Postdi Francesco6918 » 17/06/19 01:35

Un saluto a tutti gli amici del forum , per facilitarmi il lavoro ho abbandonato per il momento il post precedente (Modificare Macro indice massimo 2 ambi ) vi chiedo una gentilezza avrei bisogno di 2 macro, la 1° Macro e copiare le celle filtrate (VUOTE) del foglio1 e copiarle nel foglio2, mi spiego nella colonna Y6 o applicato un filtro, filtrando le celle vuote vorrei copiare tutte le celle visibili solo i valori (Potrebbero contenere formule) a partire dalla colonna X7:AF nel foglio2 a partire colonna X7:F.
2° Macro nella colonna Y4 ci sono numeri da 1 a 6 che si ripetono vorrei inserire 3 righe sotto ogni qual volta e presente il numero 6, vi allego i 2 file

Grazie

Saluti a tutti

http://www.filedropper.com/filtraecopia
http://www.filedropper.com/inserimento3righe
Francesco6918
Utente Senior
 
Post: 190
Iscritto il: 04/03/11 11:20

Sponsor
 

Re: Gentilmente 2 Macro Filtra e Copia e Inserimento Righe

Postdi Anthony47 » 17/06/19 22:02

Per quanto riguarda la prima macro, puoi crearla in proprio utilizzando il registratore di macro. Per i primi suggerimenti e le istruzioni su come registrare una macro:
viewtopic.php?f=26&t=103893&p=622593#p622593

Per la seconda, l'inserimento delle righe, faccio prima a darti il codice completo:
Codice: Seleziona tutto
Sub Insert3()
Dim myR As Long, I As Long
'
myR = Cells(Rows.Count, "Y").End(xlUp).Row
For I = myR To 4 Step -1
    If Cells(I - 1, "Y").Value = 6 And Cells(I, "Y") <> "" Then
        Cells(I, "Y").Resize(3, 1).EntireRow.Insert shift:=xlDown
    End If
Next I
End Sub


Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 16512
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Gentilmente 2 Macro Filtra e Copia e Inserimento Righe

Postdi Francesco6918 » 17/06/19 23:03

Ciao Anthony47 grazie gentilissimo.

Saluti
Francesco6918
Utente Senior
 
Post: 190
Iscritto il: 04/03/11 11:20


Torna a Applicazioni Office Windows


Topic correlati a "Gentilmente 2 Macro Filtra e Copia e Inserimento Righe":


Chi c’è in linea

Visitano il forum: Nessuno e 19 ospiti

cron