[Resolu] : Depassement de capacité

[bonite]

Bonjour,

avez-vous déjà rencontré ce problème ? je pense qu'il s'agit du presse papier qui a besoin d'être vidé de temps en temps ... mais comment faire dans du VBA ?

Merci pour cette info.

 

[job75]

Re : Depassement de capacité

Bonjour bonite,

avez-vous déjà rencontré ce problème ?

Oui, et c'est très classique...

En général, cela se produit quand on a déclaré une variable numérique :

- As Byte et que le calcul veut lui donner une valeur > 255 ou < 0

- As Integer et que le calcul veut lui donner une valeur > 32767 ou < -32768

- aussi avec As Long, As Single, voir l'aide VBA.

A+

 

[bonite]

Re,

mais oui, tu as raison que n'y ai-je pensé plutôt .... je vais transformé tous mes Integer en Long

Milles merci

 

[job75]

Re : Depassement de capacité

Re,

Vous aurez aussi le même bug avec cette macro :

Sub test1()
Dim x As Long
x = 65 * 1000
End Sub

Il faut alors écrire :

Sub test2()
Dim x As Long
x = CLng(65) * 1000
End Sub

ou :

Sub test3()
Dim x As Long
x = 65& * 1000
End Sub

A+

 

[bonite]

Re : [Resolu] : Depassement de capacité

Re,

Merci à Job75