Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

code VBA fonction si avec une boucle

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion excel31
  • 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 !

S'inscrire
E

excel31

Guest
Bonjour à tous. 🙂

je suis débutant en VBA et j'ai besoin d'un code "fonction si avec une boucle"

Voici l'explication de ce que doit faire le code VBA :

Je suis dans la Feuil1 sur la cellule I5 (il y a une date quelconque)

lorsque que le code est exécuté

1_ je doit atterrir en Feuil2 cellule D4 (il y a une date
quelconque également) et appliquer la fonction qui
suit.
2_ SI D4<L30(dans cette cellule la date d'aujourd'hui)
3_ SI VRAI _ passer à la cellule suivante "juste en
dessous" et recommencer l'étape 2
4_ SI FAUX _ COPIER la cellule et la COLLER dans la Feuil1 en cellule I5

merci svp de m'apporter votre aide.
 
Trier par date Trier par votes
Re : code VBA fonction si avec une boucle

Bonsoir et bienvenu sur le forum Excel31,


Pour information, tu n'es pas au bonne endroit!!!

Ce qui explique en grande partie que tu n'es toujours pas de réponse!

D'autre part, ton explication est incomplète! Sans ton exemple (fichier excel), je ne peux compléter par moi-même les manques!

Merci de m'être ton fichier!

En attendant voici déjà une première ébauche :

Code: 
Sub Excel31()

Dim Ligne As Long
Ligne = 4

With Sheets("Feuil2")
   
   [B][U]For[/U][/B] i = 1 [U][B]To[/B][/U] x [COLOR="Green"]' remplacer x par le nombre de fois que tu souhaite répéter [U][B]la boucle[/B][/U][/COLOR]
       If .Range("D" & Ligne) < .Range("L30") Then
            Ligne = Ligne + 1
       Else
            Sheets("Feuil1").Range("I5") = .Range("D" & Ligne)
   [B][U]Next i[/U][/B]

End With
End Sub

Bonne soirée

PS. : peut-être que si PascalXLD passe par là, voyant ton ton post il le déplacera au bonne endroit?
 
Dernière édition:
Vote positif 0 Vote négatif
Re : code VBA fonction si avec une boucle

Bonjour,

merci à Pascal XLD et à Excel-lent

le code ne marche donc voici mon fichier avec également mon premier code vba.
présentation du fichier excel PLANNING.

la Feuil1 présente les projets en cours (n°,la date de début et de fin ainsi que le poste sur lequel il est réalisé
la Feuil2 n'étant que la base de donnée premettant d'extraire les informations pour les reporter dans la Feuil1 et ainsi avoir une bonne visibilité du planning.

je veux que mon code modifie automatiquement la date de fin du projet en fonction de la date d'aujourd'hui.
Le n° du projet et la date de début sont modifiés automatiquement par la fonction BDLIRE

voilà les quelques détails en plus.
j'ai besoin de votre aide merci @+ 😉
 

Pièces jointes

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Résolu(e)
Microsoft 365 Définir une zone "aléatoire" à sélectionner en VBA
Réponses
6
Affichages
551
Magnio
  • Question Question
Microsoft 365 VBA : Problème de reconnaissance de variable avec fonction FIND
Réponses
2
Affichages
333
Dranreb
I
  • Résolu(e)
XL 2021 msgbox : timer vbyes
2 3
Réponses
40
Affichages
2 K
isandre
I
  • Question Question
XL 2019 Prénoms à souhaiter
2
Réponses
15
Affichages
830
lynyrd
  • Question Question
XL 2019 football automatiquement avec les macros vba code
Réponses
2
Affichages
385
frederio
B
  • Résolu(e)
Microsoft 365 Problème dans formule VBA
Réponses
7
Affichages
578
BOILEAU
B
  • Question Question
Microsoft 365 créer des feuilles automatiques et une formule avec condition de remplissage
Réponses
2
Affichages
417
luno123
  • Résolu(e)
XL 2016 Erreur dans code VBA
4 5 6
Réponses
76
Affichages
4 K
patricktoulon
  • Question Question
Microsoft 365 VBA : fonction qui calcule une durée entre 2 dates en années, mois et jours
Réponses
8
Affichages
450
BenHarber
T
  • Question Question
XL 2016 Fonction SOMME.SI.ENS - avec critere une date
Réponses
6
Affichages
572
tuti
T
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
902
piga25
S
  • Résolu(e)
XL 2019 VBA automatiser hauteur de lignes
Réponses
7
Affichages
564
sofmat
S
K
  • Question Question
Microsoft 365 vba :Vlookup + incrémentation d'une plage de donnée
Réponses
1
Affichages
442
vgendron
C
  • Résolu(e)
Autres Code VBA pour recherche et copie/coller de ligne avec mot clé.
Réponses
12
Affichages
1 K
Corentin26270
C
F
  • Résolu(e)
Microsoft 365 Effacer le contenu si cellule suivante identique
Réponses
8
Affichages
646
fanch55
M
  • Résolu(e)
XL 2016 Comment contourner la fonction Indirect d'Excel avec code VBA
Réponses
11
Affichages
684
ma6me
M
T
  • Résolu(e)
XL 2019 Filtrer certains champs au démarrage avec vba
2
Réponses
15
Affichages
1 K
telemarrk
T
D
  • Question Question
XL 2019 envoyer un email quand une date arrive à échéance
2
Réponses
19
Affichages
1 K
job75
C
  • Question Question
XL 2021 Valeurs en fonction de l'âge (jours)
Réponses
4
Affichages
400
Dranreb
T
  • Question Question
XL 2019 [vba] retourner une chaine de caractères depuis une fonction
Réponses
5
Affichages
579
teclim
T
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…