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 28/12/2011, 10h31   #1
Membre du Club
 
Homme
Inscription : janvier 2010
Messages : 176
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Secteur : Industrie

Informations forums :
Inscription : janvier 2010
Messages : 176
Points : 67
Points : 67
Par défaut Utilisation de FormulaR1C1

Bonjour,

Je cherche à utiliser FormulaR1C1 dans une boucle sur l'indice i. Je n'arrive pas à comprendre ce qui ne va pas dans l'expression

Code :
Range("A6").Offset(i, 5).FormulaR1C1 = "=IF(ISBLANK(RC[-4]),"""",SQRT(3)*R[i-1]C[6]*R[2-i]C[6]*RC[-1]*RC[-4])"
L'erreur vient de , qui sont 2 cellules fixes dans ma feuille, mais dont la position relative est modifiée à chaque tour de boucle.

Merci d'avance
d0n32 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 28/12/2011, 10h39   #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,

Quelle est la valeur de i pendant l'erreur? Quelle est le numéro d'erreur et son descriptif?
__________________
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 00
Vieux 28/12/2011, 10h39   #3
Responsable
Office & Excel

 
Avatar de Pierre Fauconnier
 
Homme Pierre Fauconnier
Formateur et développeur informatique indépendant
Inscription : novembre 2003
Messages : 8 199
Détails du profil
Informations personnelles :
Nom : Homme Pierre Fauconnier
Âge : 45
Localisation : Belgique

Informations professionnelles :
Activité : Formateur et développeur informatique indépendant
Secteur : Enseignement

Informations forums :
Inscription : novembre 2003
Messages : 8 199
Points : 14 398
Points : 14 398
Envoyer un message via Skype™ à Pierre Fauconnier
Salut.

Code :
Range("A6").Offset(i, 5).FormulaR1C1 = "=IF(ISBLANK(RC[-4]),"""",SQRT(3)*R[" & i & -1& "]C[6]*R[2-" & i & "]C[6]*RC[-1]*RC[-4])"
Tu dois en fait recomposer la chaîne en concaténant les données.
__________________
"Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
---------------

Ma nouvelle vidéo: comparer des listes via une MFC - Mes articles sur DVP
Vous souhaitez rédiger pour DVP? Contactez-moi
Amoureux de la langue française? Venez corriger nos ressources
VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
N'oubliez pas de VOTER (en bas à droite d'un message)

---------------
Pierre Fauconnier est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 28/12/2011, 10h47   #4
Membre du Club
 
Homme
Inscription : janvier 2010
Messages : 176
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Secteur : Industrie

Informations forums :
Inscription : janvier 2010
Messages : 176
Points : 67
Points : 67
Bonjour et merci de vos réponses !

@jfontaine : i=0 lors de l'erreur (premier tour de boucle). Une bête erreur 400... Edit : au temps pour moi, erreur 1004 (erreur définie par l'application ou l'objet)

@Pierre Fauconnier : je viens d'essayer ta solution, l'erreur est toujours là. Le "i" ne risque-t-il pas d'être considéré comme un string avec cette syntaxe ?
d0n32 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 28/12/2011, 10h57   #5
Responsable Visual Basic
 
Avatar de bbil
 
Inscription : juin 2003
Messages : 11 773
Détails du profil
Informations personnelles :
Âge : 45
Localisation : France, Ariège (Midi Pyrénées)

Informations forums :
Inscription : juin 2003
Messages : 11 773
Points : 16 849
Points : 16 849
Envoyer un message via Skype™ à bbil
bonjour,

dans la formule à Pierre il y as un & en trop entre i et -1..

Citation:
... i & -1...
bbil est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 28/12/2011, 11h02   #6
Membre du Club
 
Homme
Inscription : janvier 2010
Messages : 176
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Secteur : Industrie

Informations forums :
Inscription : janvier 2010
Messages : 176
Points : 67
Points : 67
Exact, je l'avais remarqué
En fait Excel ne semble pas trop aimer la syntaxe du type :
En revanche,
fonctionne parfaitement.

Merci à vous tous !
d0n32 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 28/12/2011, 11h25   #7
Responsable
Office & Excel

 
Avatar de Pierre Fauconnier
 
Homme Pierre Fauconnier
Formateur et développeur informatique indépendant
Inscription : novembre 2003
Messages : 8 199
Détails du profil
Informations personnelles :
Nom : Homme Pierre Fauconnier
Âge : 45
Localisation : Belgique

Informations professionnelles :
Activité : Formateur et développeur informatique indépendant
Secteur : Enseignement

Informations forums :
Inscription : novembre 2003
Messages : 8 199
Points : 14 398
Points : 14 398
Envoyer un message via Skype™ à Pierre Fauconnier
Citation:
Envoyé par bbil Voir le message
bonjour,

dans la formule à Pierre il y as un & en trop entre i et -1..
Exact. Je n'avais pas pris le temps de tester
__________________
"Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
---------------

Ma nouvelle vidéo: comparer des listes via une MFC - Mes articles sur DVP
Vous souhaitez rédiger pour DVP? Contactez-moi
Amoureux de la langue française? Venez corriger nos ressources
VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
N'oubliez pas de VOTER (en bas à droite d'un message)

---------------
Pierre Fauconnier 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 02h08.


 
 
 
 
Partenaires

Hébergement Web