Bonjour les amis,

Classique.
Alimentation d'une variable Tableau et report de sa transposition sur une feuille de travail.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
       With .Worksheets("Base")
 
                If .FilterMode = True Then .ShowAllData
 
                Set labase = .Range("A2").Resize(UBound(tablo_collab, 2), UBound(tablo_collab, 1))
 
                With labase
                        .Value = WorksheetFunction.Transpose(tablo_collab)
                        .Replace What:="~?", Replacement:="", Lookat:=xlPart
                        '.Cells(1, 1).Offset(-1, 0).Resize(UBound(tablo_collab, 2) + 1, UBound(tablo_collab, 1)).Columns.AutoFit
                End With
 
                Set labase = Nothing
 
                Application.Goto Reference:=.Range("A1"), Scroll:=True
 
        End With
Sauf que le report me générait une erreur
1004 - Erreur définie par l'application ou l'objet
Mon tableau a pour dimensions 10 champs pour 800 enregistrements.

Par dichotomie, j'ai trouvé "le coupable".

Un champ comportait comme les 2 premiers caractères
=>
J'ai donc dû remplacer ces caractères.
A noter que l'alimentation de la variable tableau ne pose aucun problème.
C'est, je me répète, son reversement sur la feuille qui générait l'erreur.

Bizarre.

Je voulais vous en faire part.

Auriez-vous une explication? D'autres caractères seraient-ils susceptibles de générer ce type d'erreur?

Par avance, merci pour votre - précieux - concours.