Lire une cellule et faire une boucle
bonjour
je voudrais lire
la cellule 7,3 et si il ya rien dedant j ecris de cette cellue a la 33 de la meme ligne
mai ca marche que sur le premier passage comme j ai ecrit dans la cellule 7,3
quelle formule utiliser
merci
For a = 3 To 33
If Cells(7, 3).Value = "" Then
Cells(7, a).Value = Sheets(FNomDuMois$(i + 1)).Cells(Z, a).Value
End If
If a = 33 Then
Z = Z + 1
End If
Next aBonsoir,
Ce serait plus simple de mettre un fichier en ligne...
A quoi correspond --> Sheets(FNomDuMois$(i + 1)).Cells(Z, a).Value et surtout --> FNomDuMois$
A te relire
bonjour
la ref c est la feuille de mars le bp commande 2 entrez numeros de semaine 9 ou 13 et recuperation des donnéé du mois precedent de la semaine a copier dans la feuille semaines
macro dans le module 10 changer for a = 3 to 33
merci
-- 14 Avr 2011, 19:52 --
on doit ecrire dans la feuille semaine les donnée
merci
Bonsoir
Je n'ai traité que la partie recopie de la semaine
A tester
bonjour
grand merci
je test
salut marche bien
a tu une a=solution pour afficher un calendrier quand je click sur nouvelle action et jour
merci