Macro qui ne fonctionne pas totalement
jc80
Messages postés
5063
Statut
Membre
-
ccm81 Messages postés 11033 Statut Membre -
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
J'ai un petit souci avec cette macro ,pouvez-vous svp me dire ce qui cloche
J'ai un petit souci avec cette macro ,pouvez-vous svp me dire ce qui cloche
Sub SumEOH()
Set Ws = Sheets("Feuil1")
Ws.Range("B1").Value = WorksheetFunction.Sum(Range("A1"), -Range("C1"))
Set Ws = Sheets("Feuil1")
Ws.Range("C1").Value = WorksheetFunction.Sum(Range("A1"), -Range("B1"))
End Sub
EDIT : Ajout des balises de code
Cordialement
A voir également:
- Macro qui ne fonctionne pas totalement
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Macro maker - Télécharger - Divers Utilitaires
- Macro word - Guide
2 réponses
Bonjour,
Cette macro (à une petite modification inutile prés ... ) fonctionne très bien
Quel est ton problème exactement ??
Cette macro (à une petite modification inutile prés ... ) fonctionne très bien
Sub test()
Set Ws = Sheets("Feuil1")
Ws.Range("B1").Value = WorksheetFunction.Sum(Ws.Range("A1"), -Ws.Range("C1"))
Ws.Range("C1").Value = WorksheetFunction.Sum(Ws.Range("A1"), -Ws.Range("B1"))
End Sub
Quel est ton problème exactement ??
Bonjour à tous les deux
Je simplifierai même un peu plus
mais je crois que ça ne répond pas exactement à
cette demande
Cdlmnt
Je simplifierai même un peu plus
Sub test()
Set Ws = Sheets("Feuil1")
Ws.Range("B1").Value = Ws.Range("A1") - Ws.Range("C1")
Ws.Range("C1").Value = Ws.Range("A1") - Ws.Range("B1")
End Sub
mais je crois que ça ne répond pas exactement à
cette demande
Cdlmnt
