Suppression automatique espace derrière nombre

Question

Bonjour,

J'ai publié récemment un poste pour une recherche V qui ne fonctionne pas ( colonne I et J page lien article machineV8) mais il s'avère qu'il y a des espaces derrière mes chiffres de la colonne A page Article FID
On m'a donné ce code qui ne fonctionne pas ( pour moi, je l'ai peut être mal renseigné)

Serait-il possible de m'aider et affecter ces lignes de code à mon bouton Actualiser svp

10fid-reference-lien-machine-protoype.zip (706.76 Ko)

Il s'agit d'une connexion à une base d'un logiciel, je ne peux pas faire autrement pour récupérer les données sous une autre forme.

Sub SupprimeEspace()

For Each c In [A2:A5000]

c.Value = Application.Trim(c.Value)

Vous remerciant par avance de votre aide

fanfan38 · Accepted Answer

Sinon la macro dans module 1 à modifier

Sub Actualiser()
  Dim i As Long
  For i = 1 To [ITEMBL].Rows.Count
    [ITEMBL].Item(i, 1) = Application.WorksheetFunction.Trim([ITEMBL].Item(i, 1))
  Next
End Sub

A+ François

fanfan38 · Answer

Dans la colonne A de la feuille "Article FID" tu as des Pxxxxx.... Pour les autres j'ai selectionné les blancs qu'il y avait derrière un chiffre quelconque et je les ai copiés. Accueil/rechercher selectionner/remplacer Dans remplacé j'ai copié les blancs et j'ai cliqué sur remplacer tout... A+ François...