Excel Forum

	Soluzioni Excel Domande e Risposte
		Aiuto per excel x favore

Pagina precedente | 1 | Pagina successiva

Vota | Stampa | Notifica email

« Discussione Precedente | Lista | Discussione Successiva »

Autore

Aiuto per excel x favore

Ultimo Aggiornamento: 21/04/2017 23:14

satos

Post: 155

Registrato il: 29/04/2002

Utente Junior

2007

OFFLINE

21/04/2017 18:27

00#1

Ciao, chiedo cortesemente un aiutoneeeeee
Mi spiego, provo:Il file excel contiene un foglio "Archivio" con un bottone che aggiorna le estrazioni in automatico. Poi c'è anche un folio "Previsioni" dove ci sono 20 caselle da A3:T3 che dovranno essere occupate
dall'ultima estrazione riportata nel foglio archivio "In questo momento è presente quella delle 17,40".
Quello che vorrei io è riportare l'ultima estrazione nel foglio previsioni ed esattamente nelle caselle attraverso il bottone esistente nel foglio previsioni.
Allego il file [SM=x423023]

Download (25 KB)

[Modificato da satos 21/04/2017 18:32]

dodo47

Post: 1.213

Registrato il: 06/04/2013

Utente Veteran

2010

OFFLINE

21/04/2017 19:23

00#2

Ciao
non mi sembra così difficile....

Sub aggiornaUltima()
Dim wk1 As Worksheet, wk2 As Worksheet, ur As Long, i As Integer
Set wk1 = Worksheets("Archivio")
Set wk2 = Worksheets("Previsioni")
ur = wk1.Range("A" & Rows.Count).End(xlUp).Row
For i = 1 To 20
    wk2.Cells(3, i) = wk1.Cells(ur, i + 1)
Next
Set wk1 = Nothing
Set wk2 = Nothing
End Sub

Saluti

[Modificato da dodo47 21/04/2017 19:24]

Domenico
Win 10 - Excel 2016

satos

Post: 155

Registrato il: 29/04/2002

Utente Junior

2007

OFFLINE