Crea tabella

Messaggi
OFFLINE

LadyExcel85

Post: 23

Registrato il: 26/10/2018

Città: CASALE MONFERRATO

Età: 38

Utente Junior

2016
00 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
Download (9 KB)

OFFLINE

alfrimpa

Post: 4.536

Registrato il: 21/06/2013

Città: NAPOLI

Età: 70

Utente Master

Excel 365

00 26/12/2020 11:52

Ciao LadyExcel85

Prova con questo codice

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

OFFLINE

LadyExcel85

Post: 23

Registrato il: 26/10/2018

Città: CASALE MONFERRATO

Età: 38

Utente Junior

2016

00 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!

Excel Forum Per condividere esperienze su Microsoft Excel

Crea tabella

Anteprima