Copier info userform sur feuil excel

mayvba -  
 mayvba -
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

2 réponses

  1. mamou
     
    jvoudrais debloquee ma puce pouvais vous me donne un exp svp
    0
  2. mayvba
     
    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
    0