Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Crea tabella

Ultimo Aggiornamento: 26/12/2020 12:55
Post: 23
Registrato il: 26/10/2018
Città: CASALE MONFERRATO
Età: 38
Utente Junior
2016
OFFLINE
26/12/2020 11:32

Ciao a tutti,

chiedo nuovamente aiuto, avrei bisogno che inserendo dei numeri variabili di volta in volta in due celle definite, si generi una tabella con numeri progressivi a partire da una cella definita per un numero di righe pari al secondo numero inserito.
Allego il file di esempio, in R1 andrò ad inserire un dato (in questo caso 4) e vorrei che a partire da C6 inserisse i numeri progressivi in riga da uno a quattro, in R2 andrò ad inserire un altro dato (in questo caso 8) che indica il numero di righe da compilare con numeri progressivi per un massimo di 4 colonne.
Sono certa che con vba si possa fare ma non riesco ad elaborarlo.

Grazie e saluti
Post: 4.536
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
26/12/2020 11:52

Ciao LadyExcel85

Prova con questo codice

vb
Sub CreaTabella()
Dim riga As Integer
Dim col As Integer
col = ActiveCell.Column
riga = ActiveCell.Row
    For r = riga To Range("R2").Value + riga - 1
        For c = col To Range("R1").Value + col - 3
            X = X + 1
            Cells(r, c) = X
        Next c
    Next r
End Sub
[Modificato da alfrimpa 26/12/2020 12:03]

Alfredo
Post: 23
Registrato il: 26/10/2018
Città: CASALE MONFERRATO
Età: 38
Utente Junior
2016
OFFLINE
26/12/2020 12:55

Crea Tabella
Ho modificato il codice per il riempimento in colonna come segue e fa esattamente quello che desideravo:

For c = col To Range("R1").Value + col - 1 (anziché -3)

Grazie!
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 10:53. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com