Remplir une plage de cellules entre deux cellules

  • Initiateur de la discussion Initiateur de la discussion Fred009
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Fred009

XLDnaute Nouveau
Bonjour,

Je cherche le code vba pour effectuer cette manip :

Je suis sur la feuille 2.
Je cherche à remplir une plage de cellules de la colonne B entre deux cellules de la colonne A.
J'ai une date en A1 et une autre en A10. Si ces dates correspondent avec deux dates que j'ai sur ma feuille 1, je remplis en texte toutes les cellules entre B1 et B10 de la feuille 2.

Merci pour votre aide.

Frédéric
 
Re : Remplir une plage de cellules entre deux cellules

Re, Bonjour vmatthieu

Je crois avoir compris
Tu veux remplir les cellules avec le texte en colonne A selon les dates de début et de fin en colonne B et C de la feuille Taches, les cellules correspondantes des feuilles semestre
Exemple pour Appel d'offre
Les cellules D5[noparse]😀[/noparse]15 de la feuille semestre1 doivent contenir Appel d'offre et la macro devra faire la même chose pour le reste du tableau
 
Dernière édition:
Re : Remplir une plage de cellules entre deux cellules

Oui Staple 1600.

J'ai créer un fichier exemple plus clair.

Les tâches sont dans la feuille 1. En feuille 2, ce que je souhaite afficher.

Je précise que j'ai caché la colonne B dans la feuille semestre1 qui me permet de retrouver les dates de début et fin de la feuille tâches (on fait comme on peut hein ^^) pour afficher mon texte dans les cellules souhaitées.
 

Pièces jointes

Dernière édition:
Re : Remplir une plage de cellules entre deux cellules

Re

Comment crois-tu que j'avais compris?
j'avais ouvert ton fichier exemple 😉 du message #3.

Bon maintenant, il reste plus qu'à macroter mais je vais d'abord digérer (repas de famille oblige)

D'autres ici devraient venier te filer un coup de main.
 
Dernière édition:
Re : Remplir une plage de cellules entre deux cellules

re,
il doit y avoir plus efficace mais bon
Sub mettretexte()
Dim tache As Integer
Dim coldate As Integer
Dim nbligne As Integer
Dim val As Long
Dim val2 As Long
Dim test As Long
For tache = 2 To 6
For coldate = 2 To 17 Step 3
For nbligne = 2 To 32
val = Feuil1.Cells(tache, 2).Value
val2 = Feuil1.Cells(tache, 3).Value
With Feuil2

If .Cells(nbligne, coldate).Value >= val And .Cells(nbligne, coldate).Value <= val2 Then
Cells(nbligne, coldate + 2) = Feuil1.Cells(tache, 1)
Else
End If

End With
Next nbligne
Next coldate
Next tache
End Sub



tu peux dupliquer la partie with feuil2 jusqua end with avec un with feuil3 (ton deuxième semestre) end with

par contre change les date c'est en 2012 sur ta deuxième feuille sinon ca ne marche pas
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
81
Réponses
10
Affichages
203
Réponses
11
Affichages
153
Réponses
3
Affichages
115
Retour