La fonction titre et SPi sont pour 2 colonnes différents si jamais. Bonne journée Bonsoir, Alors cela fonctionne sur une feuille du classeur, mais pas sur toutes. La ligne en rouge est en cause... Dépassement de capacité vba 2. Je réouvre donc le sujet, je n'arrive pas a uploader le fichier sur le site, il est disponible sous ce lien:! Merci! 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 Code: Tout sélectionner Sub titre() For i = 2 To Range("A" &)(xlUp) - 1 Cells(i, 8) = (Cells(i + 1, 2) - Cells(i, 2)) / Cells(i, 2) Sub SPI() Cells(i, 9) = (Cells(i + 1, 6) - Cells(i, 6)) / Cells(i, 6) Sub rdtanormaux() Cells(i, 10) = (Cells(i, 8) - Cells(i, 9)) Sub pppp() Dim RR As Worksheet For Each RR In tivate 05/03/2013, 22h15 #8 Pourquoi ne testes tu pas la valeur de Cells(i, 6) comme nous te l'avons proposé? 05/03/2013, 22h27 #9 1 2 3 4 5 if val ( "" & Cells ( i, 6)) = 0 then Cells ( i, 9) = 0 Cells ( i, 9) = ( Cells ( i + 1, 6) - Cells ( i, 6)) * ( 1 / Cells ( i, 6)) 05/03/2013, 22h33 #10 Envoyé par jfontaine Excuse moi je ne vois pas ou cela est proposé, comment l'écrirais tu?

Dépassement De Capacité Vba Pour

Merci

Bonjour, suite, Je ne sais pas, moi avec Vista 32 + VB6, aucun problème, enfin, si, j'ai juste eu les menus qui étaient devenus trop larges, voir les feuilles, mais ça a peut être aussi à voir avec la taille de l'écran? J'ai tout retassé, depuis RAS. Oui, ta variable long semble se comporter comme un integer, je ne sais pas, peut être un rapport avec le code en amont? Pour ce qui me concerne, quand j'ai un problème de ce genre et que je ne trouve pas, je balance un Double et c'est réglé, avec la RAM actuelle on n'est pas à une variable près, même pas à cent d'ailleurs, et peut être qu'après tu comprendras pourquoi... Dépassement de capacité vba pour. Y a par exemple la possibilité il me semble, sous un nom savant, de forcer un type de variable en un autre, n'est-ce pas un truc de ce genre... Désolé, peut être qu'un savant en variables va répondre? Cordialement;o) - Logiciels, romans, contacts: _______________________.. "Christian Hubert-Hugoud / weabow - Xtrem7" le message de news: Facile: Si je dépasse les 32. 000 et des peuffes, il plante le message d'erreur.

July 31, 2024, 8:48 am