Rechercher : dans
Par :

Copier info userform sur feuil excel

Dernière réponse le 6 mar 2008 à 10:40:02 mayvba, le 6 mar 2008 à 09:20:57 
 Signaler ce message aux modérateurs

Bonjour,
J'ai créé une userform contenant des listbox et je récupère toutes les informations de ce champs dans une feuille Excel pour l'imprimer. Cependant, la hauteur de chacune de mes celllules semble être limitée à 32 lignes car tout les contenu n'est pas imprimé et lorsque je tape sur entrée dans ma user form il apparait un rectangle dans la cellule de ma feuille Excel. Je code en VBA.
Comment tout imprimer quand il y a plus de 32 lignes
Comment supprimer ces rectangles? Quel est le code ascii de ce symbole;
Merci d'avance.

Configuration: Windows XP
Internet Explorer 6.0

Meilleures réponses pour « Copier info userform sur feuil excel » dans :
Copier une formule VoirAprès avoir laborieusement composé une formule dans une cellule, il est fréquent de vouloir la recopier d’autres cellules. Vous pouvez procéder de plusieurs façons. COPIER-COLLER La méthode la plus primaire consiste à sélectionner la cellule...

1

mamou, le 6 mar 2008 à 09:24:44

Jvoudrais debloquee ma puce pouvais vous me donne un exp svp

Répondre à mamou

2

 mayvba, le 6 mar 2008 à 10:40:02

Bon j'ai trouvé quelque chose: je parcours ma cellule Excell et je remplace le rectangle par 2 espaces:

temp= Workbooks("fichier.xls").Sheets("feuille").Cells(x, y).Value

For i = 1 To Len(temp)
cara = Mid(temp, c, 1)
If Asc(cara) = 10 Then
temp= Workbooks("fichier.xls").Sheets("feuille").Cells(x, y).Value= Mid(temp, 1, c - 2) & " " & Mid(temp, c + 1, Len(temp))
temp= Workbooks("fichier.xls").Sheets("feuille").Cells(x, y).Value
End If
c = c + 1

Répondre à mayvba
Collection CommentÇaMarche.net