Insérer un calcul dans fonction Rows

Auronfr -  
ThauTheme Messages postés 1564 Statut Membre -
Bonjour,

je voudrais insérer un calcul de somme dans la fonction Rows de VBA:

Rows("3:SOMME(A1+A2)").select

Est-ce seulement possible ?
Si oui comment faire car j'ai essayé plusieurs variante sans succès.

En vous remerciant.

3 réponses

  1.
    ThauTheme Messages postés 1564 Statut Membre 160
     
    Bonjour Auronfr, bonjour le forum,

    Essaie comme ça : 
    Rows("3:" & Application.WorksheetFunction.Sum(Range("A1:A2"))).Select


    À plus,
    ThauTheme
    0
  2. Auronfr
     
    Bonjour ,

    merci de ta réponse mais cela ne fonctionne pas ...
    Voici le code que j'utilise:

    If Target.Address = "$J$2" Then
    Rows("3:" & Application.WorksheetFunction.Sum(Range("D3:L3"))).Select
    Selection.EntireRow.Hidden = True
    End If
    If Target.Address = "$I$2" Then
    Rows("3:" & Application.WorksheetFunction.Sum(Range("D3:L3"))).Select
    Selection.EntireRow.Hidden = False
    0
  3. ThauTheme Messages postés 1564 Statut Membre 160
     
    Re,

    Désolé mais le code que je t'ai envoyé fonctionne à condition que A1 ou A2 ne soit pas vide!... Je teste pratiquement toujours avant de proposer une solution...
    Après, si tu envoies le code petit bout par petit bout on va pas s'en sortir. Le Target m'indique que tu utilises une événementielle. Envoie la maro complète et on verra...
    0