Cellule vide avec '

[keshendo]

Bonjour,

Depuis peu nous avonc un nouveau logiciel de compta. Lors d'une extraction vers excel toute les cellules "vide" sont remplis avec un '
Et en VBA

On Error Resume Next
[B:B].SpecialCells(xlCellTypeBlanks).EntireRow.Delete

Cette formule n'efface pas les lignes "vide". un copier/coller (valeur) ne fonctionne pas.

Merci pour votre aide !

 

[Misange]

Re : Cellule vide avec '

Bonjour
Une petite astuce très simple et très pratique :

Copie ta colonne, ouvre l'éditeur VBA. Colle le contenu de ton texte dans l'éditeur, les apostrophes disparaissent ! il ne te reste plus qu'à faire l'opération inverse.

Sinon cette macro de John Walhenbach

sub ZapPrefixes()  'J. Walkenbach, mpep    
For Each cell In ActiveSheet.UsedRange   
If cell.PrefixCharacter <> "" Then    
cell.Formula = cell.Formula   
End If  
Next cell    
end sub

 

[keshendo]

Re : Cellule vide avec '

Merci beaucoup de ton aide et super rapide en plus !

Je n'ai pas compris ta première solution mais la macro fonctionne nickel.

Encore merci!

 

[Misange]

Re : Cellule vide avec '

Tant mieux.
Pour la première soluce c'est bête comme choux (si tu as une seule colonne de données à traiter à la fois. Si tu en as beaucoup ça peut devenir fastidieux) : tu copies tes données de la feuille après importation
tu vas dans VBA et là tu les colles dans l'éditeur.
Tu copies alors dans l'éditeur et tu recolles dans la feuille, les ' ont disparu.