Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

mise en forme de donnée texte vers nombre

  • Initiateur de la discussion Initiateur de la discussion gege21
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

gege21

XLDnaute Occasionnel
bonjours a tous

j'ai besoin de votre aide
bans mon code pour faire la mise en forme je doit donne le nombre de ligne que la macro doit metre en forme ici "a1 a q5000"
je voudrai que la macro trouve elle même le nombre de ligne a mettre en forme 😕

merci de votre aide

Code:
Sub test()
With Worksheets("impor")
With .Range("A1:q5000")
.Replace ".", ","
x = .Value
For a = 1 To UBound(x, 1)
For b = 1 To UBound(x, 2)
If IsNumeric(x(a, b)) Then
x(a, b) = CDbl(x(a, b))
End If
Next
Next
.NumberFormat = "General"
.Value = x
End With
End With
End Sub
 
Re : mise en forme de donnée texte vers nombre

Bonsoir Gege21 🙂,
En principe
Code:
Range("A1048576").End(xlUp).Row
te donne la dernière ligne utilisée sous 2007. Non compatible avec 2003 où le nombre de ligne était "seulement" de 65536 😛... Donc pour être compatible, tu peux utiliser
Code:
Range("A65536").End(xlUp).Row
à moins que tu n'ai plus de 65 536 lignes 😀 !
Soit adapté à ton code
Code:
With .Range("A1:Q" & Range("A65536").End(xlUp).Row)
Bon courage 😎
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
912
Réponses
15
Affichages
788
Réponses
4
Affichages
735
Réponses
5
Affichages
574
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
523
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…