VBA erreur 6 problème d'éxecution macro

Résolu

Lucas922 Messages postés 4 Statut Membre -
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention - 14 sept. 2016 à 15:35

Bonjour,
J'ai un petit probleme lors de l'execution de ma macro un méssage d'erreur s'affiche à cette ligne le msg d'erreur n°6 = dépassement de capacité
Je suis novice en vba
Pouvez vous m'aider ?
cordialement

 ActiveWorkbook.Sheets("COPIL").Cells(bbb, 188) = correctionsRESERVES
        If correctionsAppros <> 0 Then
            ActiveWorkbook.Sheets("COPIL").Cells(bbb, 202) = délaicorrectionsRESERVES / correctionsRESERVES (le message d'erreur survient à cette ligne)      
        Else
            ActiveWorkbook.Sheets("COPIL").Cells(bbb, 202) = 0
        End If

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici :ICI

Merci d'y penser dans tes prochains messages.

Afficher la suite

A voir également:

VBA erreur 6 problème d'éxecution macro
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Nero 6 - Télécharger - Gravure
Macro word - Guide
Ipad mini 6 - Guide
Macro recorder - Télécharger - Divers Utilitaires

2 réponses

Réponse 1 / 2
jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention 4 832

Bonjour,
Que valent tes différentes variables au moment du plantage ?
0
1. Lucas922
  
  Toutes les variables sont prises en compte jusqu'à cette ligne qui plante
  
  0
2. jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention 4 832 > Lucas922
  
  certes...... mais..... elles contiennent quoi comme valeur au moment où ça plante ??
  
  0
3. Lucas922
  
  Au moment du plantage elles sont vierge
  
  0
4. jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention 4 832 > Lucas922
  
  Donc .... 0 divisé par 0 .... = ? .... l'infini !
  D'où l'erreur !
  
  0
5. Lucas922
  
  Merci beaucoup pour votre aide je comprend mon erreur mais pouvez vous du coup me dire qu'est-ce que je dois entrer afin de pouvoir garder le "0" tout en poursuivant ma macro s'il vous plaît
  
  0
Réponse 2 / 2
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
Bonjour,

Si vous etes toujours a l'ecoute:
```
    ActiveWorkbook.Sheets("COPIL").Cells(bbb, 188) = correctionsRESERVES
    If correctionsAppros <> 0 And correctionsRESERVES <> 0 And délaicorrectionsRESERVES <> 0 Then
        ActiveWorkbook.Sheets("COPIL").Cells(bbb, 2) = délaicorrectionsRESERVES / correctionsRESERVES
    Else
        ActiveWorkbook.Sheets("COPIL").Cells(bbb, 202) = 0
    End If
```
0
1. jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention 4 832
  
  On ne sait pas d'où proviennent tes variables... comment sont elles alimentées, comment sont elles initialisées ???
  De plus ... NE JAMAIS utilisé d'accents dans des noms de variables !!!
  
  0
  1. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717 > jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention
    
    Bonjour,
    
    Tout a fait Thierry, encore qu'il n'y a pas d'accent et ce n'est pas mon code mais celui de Lucas922. Il a au moins le principe qu'il faut tester les variables pour eviter les ennuis sur calcul
    
    0
  2. jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention 4 832 > f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention
    
    Ah oui.. je n'ai pas vu que c'était un autre intervenant... sorry
    
    Par contre :
    encore qu'il n'y a pas d'accent
    
    et : délaicorrectionsRESERVES
    A moins que mes yeux ne me jouent des tours... je vois bien un accent .. ^^
    
    0
  3. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717 > jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention
    
    Re,
    
    En effet, a l'insu de mon plein gre ....................
    
    0

VBA erreur 6 problème d'éxecution macro

2 réponses

Discussions similaires

Newsletters