Automatisation par macro

[jumbaii]

Bonjour à tous,

Merci pour tous vos conseils, ce forum est vraiment une mine d'or. J'ai un petit soucis qui me prends beaucoup de temps et que je n'arrive pas à régler.

J'ai 5 colonnes avec 8760 références par colonne (en l'occurence Jour - heure - température - bulbe humide - pression atmosphérique) et j'aimerais créer une matrice dont l'ordonnée serait les jours et l'abs = heure. L'idée serait de pouvoir extraire de ma table de base, pour chaque jour, les données horaires en Pression, bulbe humide et température pour chaque heure, en créant une matrice par donnée. En gros, que la macro me prenne les valeurs pour les heures de 0 à 23 et qu'elle extrait, sur une ligne (le jour en question), la valeur Pression par exemple. Arrivé à la 25ème donnée, qu'elle retourne à la ligne et recommence pour les 24 données suivantes.

Merci d'avance

 

[pierrejean]

Re : Automatisation par macro

bonjour jumbaii

Teste cete macro

Sub test()
ligne = 1
For n = 2 To Range("Z65536").End(xlUp).Row
  If Range("Z" & n) = 0 Then ligne = ligne + 1
  Cells(ligne, Range("Z" & n) + 2) = Range("AB" & n)
Next n
End Sub

 

[jumbaii]

Re : Automatisation par macro

bonjour jumbaii

Teste cete macro

Sub test()
ligne = 1
For n = 2 To Range("Z65536").End(xlUp).Row
  If Range("Z" & n) = 0 Then ligne = ligne + 1
  Cells(ligne, Range("Z" & n) + 2) = Range("AB" & n)
Next n
End Sub

Merci, ça fonctionne parfaitement bien, merci