MicroHelp VBA Excel

Meliodas54 Messages postés 14 Statut Membre -  
Meliodas54 Messages postés 14 Statut Membre -
Bonjour,

Je réalise actuellement une macro permettant d'extraire des informations d'un document word vers un document excel mais j'ai un micro soucis.

Voici mon code: 

' No Commande (dans le 1er tableau, ligne 2, colonne 2)
        WDoc.Tables(1).Cell(2, 2).Range.Copy      'copie la valeur dans le presse papier
        ws.Select                                   'bascule vers Excel
        ws.Cells(i, 2).PasteSpecial (xlPasteValues) 'colle la valeur dans la cellule


Le problème est que je copie toute la cellule ce qui me donne par exemple ":938"
Y aurait t-il une fonction permettant de copier cette même cellule au même endroit mais en supprimant les ":" ?

Merci
A voir également:

1 réponse

Réponse 1 / 1
Zoul67 Messages postés 2001 Statut Membre 149
 
Bonjour,

Par exemple en ajoutant : 
ws.Cells(i, 2).Value=Replace( ws.Cells(i, 2).Value,":","")


A+
0
Meliodas54 Messages postés 14 Statut Membre
 
C'est bon ça fonctionne ! Merci du coup de main !

J'ai un autre problème qui est apparu si jamais tu sais comment le résoudre.

Quand dans mon tableau word, j'ai une chaine de caractère comme par exemple 10G8 il n'y aucun problème.
Par contre, si dans mon tableau j'ai juste un nombre, prenons 10 par exemple, l'information dans mon tableau excel est complétement incohérente.
0