Je s=E8che sur une b=EAtise, =E0 savoir copier une valeur en VBA qu'elle
soit issue d'une variable ou d'un simple copier, par exemple 01, sans
qu'Excel la traduise en num=E9rique, c'est-=E0-dire ici 1 :
Sub 1ierCas()
Dim MonNomFeuille As String
MonNomFeuille =3D "01"
Range("A1").Value =3D MonNomFeuille
End Sub
Sub 2i=E8meCas()
Set MaPlage =3D Range("A1:K" & MaDerniereLigne)
Set Destination =3D Sheets("Tempo").Range("A1")
MaPlage.AutoFilter Field:=3D4, Criteria1:=3D"<>"
Set MaPlageACopier =3D
Range("_FilterDatabase").SpecialCells(xlCellTypeVisible)
MaPlageACopier.Copy Destination
End Sub
