[VBA] ValeurCube R1C1 variables Fermé

Question

Bonjour le forum,

je rencontre actuellement un problème avec l'écriture de formule Excel via VBA.
Mise en situation :
dans un onglet d'un fichier Excel j'ai :
en A1 : un pays (on va dire "France")
en A2 : un mois (on va dire "Janvier")
en C3 : 1ere quinzaine et en D3 : 2e quinzaine
en A4 : Paris   et en B4 : Chaussures Nike
en A5 : Paris   et en B5 : Chaussures Converse
en A6 : Paris   et en B6 : Chaussures Adidas
en A7 : Paris   et en B7 : Chaussures Flic Flac
en A4 : Lille et en B4 : Chaussures Nike
en A5 : Lille et en B5 : Chaussures Converse
en A6 : Lille et en B6 : Chaussures Adidas
en A7 : Lille et en B7 : Chaussures Flic Flac
et ainsi de suite avec d'autre ville de France.

En cellule C4 j'écris manuellement 
=ValeurCube("BasedeDonnées";$A$1;$A$2;C$3;$A4)
Cette formule, si vous ne la connaissez pas, renvoie la valeur d'un indicateur dans une base de données en suivant les critères que nous lui donnons (France, Janvier, etc.)
Mais mon problème n'est pas lié à cette fonction.
Je cherche en fait à comprendre comment fonctionne les Formula R1C1 en vba pour pouvoir écrire cette formule (en prenant en compte les "$") dans toutes les cases du tableau en VBA.
Pour se faire, j'aurai souhaité savoir si nous pouvions introduire un équivalent des "$" dans une notation relative de type R1C1 ? et également si il était possible d'utiliser une variable à la place du 1. Par exemple, est-il possible d'écrire :
i = 4
L = 3
R[i]C[L]

Si vous connaissez un bon tutoriel (gratuit :p) sur l'utilisation des formules en VBA cela fera églament l'affaire.

Merci d'avance pour votre aide.

eriiic · Accepted Answer

Bonjour tout le monde, 

L'enregistreur de macro utilise .formulaR1C1. 
Mais tu n'es pas obligé de l'utiliser, tu as également .formula qui te permet d'utiliser les références de type A1 sans te prendre la tête. 

D'autre part ces 2 propriétés t'obligent à utiliser le nom anglais des fonctions. 
Tu as également .formulaLocal (et .formulaLocalR1C1) qui elles utilisent les noms de fonctions de la langue utilisée. 

Ce qui simplifie considérablement l'écriture en vba : un copier-coller de ta fonction. 
Puis le remplacement des parties variables (sans oublier de fermer et de rouvrir tes chaines avec " " à chaque remplacement).  
Par exemple remplacer A1 par: " & col & lig & " 

Sinon le principe est celui expliqué par ccm81 : une chaine concaténée pouvant utiliser des variables. 


eric

ccm81 · Answer

bonjour   

une formule style R1C1 est une chaine de caractere, qui doit etre exactement celle qui figure dans une cellule excel, on l'obtient en concatenant simplement les différentes parties de la formule   

un exemple avzec un nom de feuille  

Const f1 = "'Feuil1'"   
dim b1 as string   

  b1 = "=" & f1 & "!R" & lig & "C" & col1 - 1   
  Cells(i, co2).FormulaR1C1 = b1

et pour ton exemple de reference absolue ($)   

i = 4   
L = 3   
R[i]C[L]    

f = "=R" & i & "C" & L   
qui donnera dans la feuille excel   
=L4C3   
ou    
=$C$4   
selon le style choisi (L1C1 ou A1)   

bonne suite

eriiic · Answer

Bonjour,

Le message est : "Mémoire insuffisante
Essaie déjà en fermant et relançant excel...
Pour déposer un fichier : cijoint.fr et coller ici le lien fourni.
eric