Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 08/12/2011, 14h03   #1
Invité de passage
 
Inscription : juin 2006
Messages : 12
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2006
Messages : 12
Points : 2
Points : 2
Par défaut calcul des extrémités d'une boucle par fonction

Bonjour,

Je souhaite effectuer une boucle FOR i= deb To fin
où deb et fin sont calculés dans une fonction. Il faut donc que je construise une fonction qui me renvoie un couple de valeurs (deb,fin) et que j'écrive dans une procédure (deb,fin) = fonction boucle ().

merci d'avance !
polo92 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/12/2011, 14h17   #2
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 920
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 920
Points : 7 237
Points : 7 237
Bonjour,

Tu as en mon sens 2 possibilités

1°) Tu crées 2 fonctions, une qui retourne le début et l'autre la fin

2°) tu crées 1 fonction qui retourne un String qui contiendra le début et la fin séparé par un caractère spéciale (par exemple un / )
Tu utiliseras la fonction Split pour récupérer les valeurs Deb et Fin

Code :
1
2
3
4
5
6
 
Dim StrDebFin as string
 
StrDebfin = mafonction
 
for split(Strdebfin,"/")(0) to split(Strdebfin,"/")(1)
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 08/12/2011, 15h13   #3
Invité de passage
 
Inscription : juin 2006
Messages : 12
Détails du profil
Informations personnelles :
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : juin 2006
Messages : 12
Points : 2
Points : 2
ca marche! j'ai utilsé la 2ième solution qui me parait plus adapté à)mon problème.

Merci beaucoup!

J'espère que la prochaine fois je penserais à ce genre d'astuce.
polo92 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 00h58.


 
 
 
 
Partenaires

Hébergement Web