FORUM Tom's Hardware » Programmation » VB / VBA / VBS » referencee les cellules dans la fonction sum
 

referencee les cellules dans la fonction sum

Il y a 368 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici
Ajouter une réponse



 Mot :   Pseudo :  
 
Bas de page
Auteur
 Sujet : referencee les cellules dans la fonction sum
 
Plus d'informations

Bonjour,
La question a sans doute déjà été posée mais je n'ai pas trouver la réponse.
Je ne connais pas la syntaxe afin d'inserer une somme dans la macro.
"=Sum(Colonne_n PreniereLigne:Colonne_n DerniereLigne-2)"



[cpp]

Dim n, m, o, q
Dim ws As Worksheet
Set ws = Worksheets("feuil2" )
m = ws.Range("A1" ).End(xlDown).Row 'determine le nb de ligne
n = ws.Range("A1" ).End(xlUp).Column 'determine le nb de colonne
m = m + 1

ActiveSheet.Cells(m, n).Formula = "la valeur de m est de :" & m
ActiveSheet.Cells(m + 1, n).Formula = "la valeur de n est de :" & n

'le but est de faire la somme de la colonne dans la cellule (colonne,DerniereLigne +2)

ActiveSheet.Cells(m + 4, n).Formula = "=Sum(Colonne_n PreniereLigne:Colonne_n DerniereLigne-2)"


---------------
merci

Profil : Pointeur
Plus d'informations

presque, manque la balise fermante : [/cpp]


Message édité par KangOl le 11-11-2007 à 13:39:08

---------------
Da Bidz Triad©®™: Bidz Interceptor
.:: Smileyz version 4.2 [050625]::. -- Code source disponible sous licence GPL.
[u
Plus d'informations

Bonjour,
La question a sans doute déjà été posée mais je n'ai pas trouver la réponse.
Je ne connais pas la syntaxe afin d'inserer une somme dans la macro.
"=Sum(Colonne_n PreniereLigne:Colonne_n DerniereLigne-2)"



Code :
  1. Dim n, m, o, q
  2. Dim ws As Worksheet
  3. Set ws = Worksheets("feuil2" )
  4.     m = ws.Range("A1" ).End(xlDown).Row 'determine le nb de ligne
  5.     n = ws.Range("A1" ).End(xlUp).Column 'determine le nb de colonne
  6.     m = m + 1
  7.    
  8.     ActiveSheet.Cells(m, n).Formula = "la valeur de m est de :" & m
  9.     ActiveSheet.Cells(m + 1, n).Formula = "la valeur de n est de :" & n
  10.      
  11.     'le but est de faire la somme de la colonne dans la cellule (colonne,DerniereLigne +2)
  12.   ActiveSheet.Cells(m + 4, n).Formula = "=Sum(Colonne_n PreniereLigne:Colonne_n DerniereLigne-2)"





---------------
merci
zeb
Profil : Modérateur libre
Plus d'informations

Essaie ce code pour comprendre :

Code :
  1. Dim n As Integer, m As Integer
  2. n = 1
  3. m = 2
  4. MsgBox "n"
  5. MsgBox n
  6. MsgBox "n" & "m"
  7. MsgBox n + m
  8. MsgBox n & m
  9. MsgBox n & " " & m
  10. MsgBox "<" & n & " " & m & ">"


---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...
Plus d'informations

ok je pense faire la difference entre "n" et valeur de n
je pensais donc que cela pourrait fonctionner mais non !

Code :
  1. adresse = "A" & n & ":" & "B" & m
  2.       ActiveSheet.Cells(m + 2, n).Formula = "la valeur de adresse est : " & adresse
  3.    
  4.   ActiveSheet.Cells(m + 4, n).Formula = "=Sum(adresse)"


---------------
merci
Plus d'informations

si je demande ce qu'il y a dans la variable adresse : R[27]C[1]:R[29]C[1]
pourquoi "=sum(adresse)" affiche dans la cellule sum(adresse) et non =sum(R[27]C[1]:R[29]C[1])

j'y perds mon latin ........

Code :
  1. adresse = "R[" & m & "]C[" & n & "]:R[" & m + 2 & "]C[" & n & "]"
  2.   ActiveSheet.Cells(m + 4, n).Formula = "=SUM(adresse)"


---------------
merci
zeb
Profil : Modérateur libre
Plus d'informations

Rhooooooo!!!! T'as du mal à comprendre, toi.

Citation :

ok je pense faire la difference entre "n" et valeur de n


ok et la difference entre "adresse" et valeur de adresse ?

"=SUM(" & adresse & " )"




intelleget ? ( <-- de quoi le retrouver :sol: )


---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...
Plus d'informations

excuse. je pensais que & permetait de concatener
merco ça fonctionne


---------------
merci
Profil : Pointeur
Plus d'informations

bha oui, ca permet de concaténer ...


---------------
Da Bidz Triad©®™: Bidz Interceptor
.:: Smileyz version 4.2 [050625]::. -- Code source disponible sous licence GPL.
[u
zeb
Profil : Modérateur libre
Plus d'informations

:lol:

 


/private Tu te mets au VB KangOl ?


Message édité par zeb le 13-11-2007 à 09:42:26

---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...
Profil : Pointeur
Plus d'informations

j'en ai pas l'utilité donc non

même si j'ai déjà légèrement jouer avec vbs...


---------------
Da Bidz Triad©®™: Bidz Interceptor
.:: Smileyz version 4.2 [050625]::. -- Code source disponible sous licence GPL.
[u

Aller à :
Ajouter une réponse
  FORUM Tom's Hardware » Programmation » VB / VBA / VBS » referencee les cellules dans la fonction sum
 

Annonces Google
Publicité