Sujet Précédent Sujet Suivant

Macro excel

Lumi -  
cousinhub29 Messages postés 1135 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour tout le monde.

Je suis assez nul dans ce domaine et je me permet donc de demander de l'aide.

Je souhaite faire une macro excel qui me stockerai des valeurs dans la feuille numéro 2 à l'aide d'un bouton.
Je m'explique :

J'ai une formule dans ma feuil1 qui fait la somme de plein de chiffres (par ex. de C5 à C65 + H52 à H124)...

Je souhaiterai que le résultat de cette formule soit stocké dans une variable puis écrite dans la cellule A1 de la feuille 2.

Par contre, à chaque fois que je lance cette marco, il ne faut pas que les valeurs s'écrasent entre elles.

A1 : résultat 1
A2 : résultat 2
...

Merci d'avance pour votre aide :)

A voir également:

2 réponses

Réponse 1 / 2
melanie1324
 
Bonjour,

sub résultatformule ()

a = Sheets("Feuil1").cells(1,2) ' remplaces Feuil1 par ton nom de feuille
'cells(1,2) = cellule située à la première ligne, 2e colonne remplaces les chiffres s'ils ne sont pas bons.

i=2
do while Sheets("Feuil2").cells(i,1) <> ""
i=i+1
loop

Sheets("Feuil2").cells(i,1) = a

end sub
0
Réponse 2 / 2
cousinhub29 Messages postés 1135 Date d'inscription   Statut Membre Dernière intervention   364
 
Bonjour,

Une autre variante.... 

Sub lumi()
Dim Plg As Range
With Sheets("Feuil1")
    Set Plg = Union(.Range("C5:C65"), .Range("H52:H124"))
End With
Sheets("Feuil2").Range("A65000").End(xlUp)(2) = Application.Sum(Plg)
End Sub


Mef aux petits points, devant les .Range.....

Bonne soirée
0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses