Insérer un calcul dans fonction Rows
Fermé
Auronfr
-
8 juin 2017 à 09:10
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 - 8 juin 2017 à 15:58
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 - 8 juin 2017 à 15:58
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.
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.
A voir également:
- Insérer un calcul dans fonction Rows
- Fonction si et - Guide
- Insérer une vidéo dans powerpoint - Guide
- Calcul moyenne excel - Guide
- Insérer signature word - Guide
- Insérer liste déroulante excel - Guide
3 réponses
ThauTheme
Messages postés
1442
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
29 juillet 2022
160
Modifié le 8 juin 2017 à 10:40
Modifié le 8 juin 2017 à 10:40
Bonjour Auronfr, bonjour le forum,
Essaie comme ça :
À plus,
ThauTheme
Essaie comme ça :
Rows("3:" & Application.WorksheetFunction.Sum(Range("A1:A2"))).Select
À plus,
ThauTheme
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
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
ThauTheme
Messages postés
1442
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
29 juillet 2022
160
8 juin 2017 à 15:58
8 juin 2017 à 15:58
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...
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...