Bonsoir le forum
J'utilise ce code:
ActiveSheet.PasteSpecial Format:="Texte", Link:=False, DisplayAsIcon:=False
ActiveCell.WrapText = False
pour coller un copier venant de page web.
Le pb c'est les chr(13), le paste se fait sur plusieurs cellules à cause du CR.
Une idée de code ?
Je pensais envoyer le clipBoard dans une string et la néttoyer, remplacer les Cr par des ctrl cr. Mais je ne sais pas comment utiliser la methode PasteSpecial Format:="Texte" avec une variable !
Je n'ai pas trouvé la const vb pour le Ctrl cr.
Merci pour votre aide.
J'utilise ce code:
ActiveSheet.PasteSpecial Format:="Texte", Link:=False, DisplayAsIcon:=False
ActiveCell.WrapText = False
pour coller un copier venant de page web.
Le pb c'est les chr(13), le paste se fait sur plusieurs cellules à cause du CR.
Une idée de code ?
Je pensais envoyer le clipBoard dans une string et la néttoyer, remplacer les Cr par des ctrl cr. Mais je ne sais pas comment utiliser la methode PasteSpecial Format:="Texte" avec une variable !
Je n'ai pas trouvé la const vb pour le Ctrl cr.
Merci pour votre aide.