papaye976
Messages postés17Date d'inscriptionjeudi 9 septembre 2004StatutMembreDernière intervention10 juillet 2009 9 déc. 2005 à 15:34
un exemple pour afficher dans une texte box toutes les valeurs de la plage "utilisée" d'une worksheets....
Je ne sais pas si ça fonctionne dans l'autre sens (pour mettre un tableau dans une worksheet !!!
Dim rawText
Dim i As Long
Dim j As Long
rawText = Worksheets("Feuille1").UsedRange.Value
For i = LBound(rawText, 1) To UBound(rawText, 1)
For j = LBound(rawText, 2) To UBound(rawText, 2)
msgbox cstr(rawText(i, j)
Next j
Next i
papaye976
Messages postés17Date d'inscriptionjeudi 9 septembre 2004StatutMembreDernière intervention10 juillet 2009 9 déc. 2005 à 15:59
je ne sais pas vraiment, ton tableau est déclaré non typé pour pouvoir récupérer les valeurs du Range(...).Value sans lever d'erreur.
je crois que sinon ça ne marche pas.... mais tu peux tester...
j'ai vu tes courriers précédents: recuit simulé, technologie de groupe (rassembler des 1 dans des matrices par permutations de lignes), tu étudies quoi au juste, production, optimisation ????