combinazioni con VBA

Hai un problema con Excel?

Nuova discussione

combinazioni con VBA
di taranto57 (utente non iscritto) data: 24/08/2013 18:31:18
Buongiorno a tutti,
chiedo scusa in anticipo ma vorrei risolvere questo problema con alcune
righe di programmazione in VBA per Excel.

In foglio1 dalla cella C2 alla cella E21 inserisco degli elementi
(indifferentemente numeri o lettere) e nel foglio2 a partire dalla cella C2
vorrei che fossero rappresentate tutte le possibili combinazioni.

Esempio:

Inserimento elementi

in foglio1 C2=a B2=b
in foglio1 C3=c B3=d C3=e

Visualizzazione risultati

(gli oggetti danno vita a 6 possibili combinazioni)

in foglio2 da C2 ad H3 devono essere visualizzati i seguenti risultati
a b a b a b
c d e c d e

sono riuscito (con molta difficoltà) a scrivere alcune righe di programma in
VBA che riesce a leggere i dati del foglio1 e trascriverli in foglio2 ma non
sono riuscito a scrivere le istruzioni che mi permettano di "mescolare" i
dati.

Chiedo, se possibile, un aiuto e di seguito allego le righe di programma da
me già scritte.

Sub sviluppo()

'r=riga foglio 1
'r2 = riga foglio 2
'c2 = colonna foglio 2

r2 = 2
c2 = 3

For r = 2 To 21
If Cells(r, c2).Value <> "" Then
Foglio2.Cells(r2, c2).Value = Cells(r, c2).Value
r2 = r2 + 1
End If
Next r
r2 = 2
c2 = c2 + 1

For r = 2 To 21
Foglio2.Cells(r2, c2).Value = Cells(r, c2).Value
r2 = r2 + 1
Next r
r2 = 2
c2 = c2 + 1

For r = 2 To 21
Foglio2.Cells(r2, c2).Value = Cells(r, c2).Value
r2 = r2 + 1
Next r

End Sub
di nichicanta (utente non iscritto) data: 24/08/2013 19:15:54
Ciao taranto57, ti allego un file da adattare molto alle tue esigenze( magari con l'aiuto degli esperti di questo forum), che mi è servito per precedenti mie esigenze.
il Random dei dati avviene su una colonna e in un determinato range, di più non posso offrirti perché anche io sto crescendo (da autodidatta) grazie a questo bellissimo forum.
Ti saluto.
di nichicanta (utente non iscritto) data: 24/08/2013 19:22:16
Taranto57, eccotene un altro che tempo fa il grande HarryBosch mi ha gentilmente postato, adattalo alle tue esigenze.
Ciao.
di Vecchio Frac data: 25/08/2013 11:34:47
Metodi per mescolare vettori ce ne sono diversi... se ti serve generare un campionato a squadre c'è la soluzione dell'algoritmo Round Robin, molto interessante.

Vuoi Approfondire?