Vba

[misterx]

ok, vola

Sub aaa()

Range("a1:q100").Clear

finoA = 9

For riga = 0 To finoA: Cells(riga + 1, 1) = riga: Next riga
For riga = 0 To finoA: Cells(1, riga + 1) = riga: Next riga

For riga = 0 To finoA - 1
    For colonna = 0 To finoA - 1
    Cells(riga + 2, colonna + 2) = riga * colonna Mod finoA
    
    Next colonna
Next riga



End Sub

[a2000]

mi fa piacere che ti stai appassionando a VBA.

sarai d'accordo con me che per il 90% dei casi VBA-Excel è la miglior GUI attualmente disponibile.

[misterx]

no, non è che mi sto appassionando a VBA, lo usicchio di tanto in tanto per ottenere delle cose

tutto sommato un linguaggio vale l'altro

[a2000]

ma quello che predilige il tuo avatar è il linguaggio del corpo:

Sub aaa()

 mmmmmmhhhhhhhhhh 
 mmmmmmhhhhhhhhhh

 For figa = 0 To ficoA - 1
     For colon = 0 To ficoA - 1
      Cess(figa + 2, colon + 2) = prroooooooooooottttt    
     Next colon
 Next figa

 proooooottttttt
 prrrrrrrrrrrrrrrrrr 
 mmmmmmmhhhhhhh
 ppprrrrrrrrroooooooooootttttttt
 oooooooooooooohhhhhhhhhhh 


End Sub

[/colon] ops scusa ...

[misterx]

Originariamente inviato da a2000
ma quello che predilige il tuo avatar è il linguaggio del corpo:

Sub aaa()

 mmmmmmhhhhhhhhhh 
 mmmmmmhhhhhhhhhh

 For figa = 0 To ficoA - 1
     For colon = 0 To ficoA - 1
      Cess(figa + 2, colon + 2) = prroooooooooooottttt    
     Next colon
 Next figa

 proooooottttttt
 prrrrrrrrrrrrrrrrrr 
 mmmmmmmhhhhhhh
 ppprrrrrrrrroooooooooootttttttt
 oooooooooooooohhhhhhhhhhh 


End Sub

[/colon] ops scusa ...

ti capisco mio.............

a te manca qualche rotella.........

[a2000]

però ti diverti eh ?! !

[misterx]

digiammolo pure..........sto facendo divertire te: contento ?

[a2000]

QUESTA E' PROPRIO UNA CA,
UNA VERA CAZZA,
UNA GRANDE GIGANTESCA STREPITOSA CAZZATA!