Résolu copie coller une partie de cellule

  • Auteur de la discussion encom
  • Date de début

encom

Nouveau membre
#1
bonjour
voila dans une cellule j'ai ceci "002901002453200290000001557677258167" qui est en format texte suite a la conversion du fichier je doit prendre une partie de la cellule et le coller dans une autre cellule tout en gardant le format texte

cellule de départ Mid(ADYEN.Cells(i, 4), 6, 14) qui correspond au chiffre du dessus que je doit coller dans adyencpta.Cells(Nextrowac, 31)

sachant que
Set ADYEN = Worksheets(1)
Set adyencpta = Worksheets.Add(after:=Worksheets(1))


alors chose étrange si je fais adyencpta.Cells(Nextrowac, 31) = Mid(ADYEN.Cells(i, 4), 6, 8) il me prend bien les 8 chiffre mais si je met 14 il me met chiffre exposant.

merci de votre aide
 

drul

Obscur pro du hardware
Staff
#2
Probablement du au format des cellules, rien à voir avec la macro.
essaye un msgbox (Mid(ADYEN.Cells(i, 4), 6, 14)) voir ce que ça donne.
 

encom

Nouveau membre
#3
j'ai mis un msgbox et j'ai bien le bon chiffre dedans copier coller 100327181905 par contre visuel 1.00327E+11 j'ai meme pensé que c'était la taille de la cellule mais non.
la je sèche.
 

vaelis

Configopathe de l'extrême
#4
Meilleure réponse
C'est le format de la cellule.

Click droit sur la cellule
En anglais : Format Cells -> Number -> Number (Decimal Place : 0)

Un autre moyen d'éviter ça c'est de rajouter la chaîne "" à ton nombre pour le convertir en chaîne de caractère.

Ou alors utiliser la fonction TEXT (en anglais)
 
Dernière édition:

encom

Nouveau membre
#5
hello j'ai mis ' pour forcer le format date et ça passe

merci
 
Vous devez vous inscrire ou vous connecter pour répondre ici.
Staff en ligne
  • PriceTF141
    Modo hardware RGB
  • AccroPC2
    Modérateur
Membres en ligne
  • PriceTF141
  • hom2ver
  • AccroPC2
  • lepierrot
  • PrinceO
  • lolo2982
Derniers messages publiés
Statistiques globales
Discussions
865 026
Messages
8 054 261
Membres
1 575 517
Dernier membre
Memeldu68
Partager cette page
Haut