Formule Excel sous VBA

Résolu
marjorykwet
Messages postés
5
Date d'inscription
mardi 28 octobre 2008
Statut
Membre
Dernière intervention
17 novembre 2008
- 17 nov. 2008 à 10:51
marjorykwet
Messages postés
5
Date d'inscription
mardi 28 octobre 2008
Statut
Membre
Dernière intervention
17 novembre 2008
- 17 nov. 2008 à 14:37
Bonjour,

je programme un fichier excel, dans une variable je met le numero de la ligne puis dans une formule j'utilise cette variable pour faire une différence entre deux cellules...

lig est le numero de la ligne en question.
voici le code : Cells(lig, 14) = Cells(lig, 8) - Cells(lig, 7)

la formule ne fonctionne pas... des idées ?

merci d'avance, c'est assez urgent, c'est pour le boulot...

5 réponses

marjorykwet
Messages postés
5
Date d'inscription
mardi 28 octobre 2008
Statut
Membre
Dernière intervention
17 novembre 2008

17 nov. 2008 à 14:37
Ok merci à tous, j'ai trouvé la réponse,

il faut mettre les valeurs des cellules dans des variables.
3
lillith212
Messages postés
1229
Date d'inscription
vendredi 16 novembre 2007
Statut
Membre
Dernière intervention
16 juin 2009

17 nov. 2008 à 10:53
Bonjour,

Quel est le format de tes cellules???

Merci

S.L.B.
0
jrivet
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
59
17 nov. 2008 à 11:08
Salut,

<li>"la formule ne fonctionne pas"
As tu une erreur ou bien est ce que rien ne se passe?</li><li>"merci d'avance, c'est assez urgent, c'est pour le boulot..."
Tu nous enverras ta paye si on trouve???...
</li>Essaies peu être en évitant de passer par la propriété par défaut de l'objet Cells

Cells(Lig, 14).Value = Cells(Lig, 8).Value - Cells(Lig, 7).Value

@+: Ju£i€n
Pensez: Réponse acceptée
0
marjorykwet
Messages postés
5
Date d'inscription
mardi 28 octobre 2008
Statut
Membre
Dernière intervention
17 novembre 2008

17 nov. 2008 à 13:06
Bonjour,

"Quel est le format de tes cellules???"
Les valeurs présentes dans mes cellules sont des dates.

"As tu une erreur ou bien est ce que rien ne se passe?"
La formule ne fonctionne pas, il survient une erreur d'execution 13, erreur d'incompatibilité de type.

"Cells(Lig, 14).Value = Cells(Lig, 8).Value - Cells(Lig, 7).Value"
Bonne idée, mais je l'ai déjà tenté et cela ne fonctionne pas non plus.

Pour ce qui est de la paye ca va être chaud, mais si tu veux le programme !!

Merci déjà pour vos réponses...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
lillith212
Messages postés
1229
Date d'inscription
vendredi 16 novembre 2007
Statut
Membre
Dernière intervention
16 juin 2009

17 nov. 2008 à 14:15
Salut,

essaye DateDiff
Exemple :
Dim TheDate As Date ' Déclare les variables.
Dim Msg
TheDate = InputBox("Entrez une date")
Msg = "Jours à compter d'aujourd'hui: " & DateDiff("j", Now, TheDate)
MsgBox Msg

Extrait du msdn

Bon courage
0