Exporter tableau dans un autre fichier Excel

Bonjour à tous,

J'ai un tableau excel avec des colonnes et lignes masquées. Ainsi, mon objectif est d'exporter ce tableau avec seulement les colonnes et lignes visible dans un nouveau fichier excel avec la même mise en forme pour pouvoir le diffuser à des personnes externes.

Je sais exporter un fichier vers un autre cependant je veux uniquement garder les colonnes et lignes qui sont visibles.

Bien à vous,

Cordialement,

Votre tableau est indispensable. Il est évident que si les lignes et les colonnes visibles utilisent des valeurs cachées, on ne peut pas supprimer ce qui est caché ; dans ce cas, il faudra les protéger par mot de passe.

Sinon, c'est assez facile à faire en VBA.

Bonjour,

Merci pour votre réponse.

Ci-joint mon fichier avec le bouton Export donnée. J'ai mis une macro sur ce bouton, cela effectue bien ce que je demande cependant ça prends énormément de temps et ça fait crasher mon Excel.

La macro :

Sub Macro4()
'
' Macro4 Macro
'

'
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Copy

Workbooks.Add
ActiveSheet.Paste
End Sub

Bien à vous,

Essayez un truc dans ce goût-là :

    Dim nL As Long, nC As Long
    Dim wS1 As Worksheet, wS2 As Worksheet
    Dim plage As Range

    Set wS1 = ActiveSheet
    nL = wS1.Cells.SpecialCells(xlCellTypeLastCell).Row
    nC = wS1.Cells.SpecialCells(xlCellTypeLastCell).Column

    Set plage = wS1.Range(Cells(1, 1), Cells(nL, nC))
    Application.Workbooks.Add
    Set wS2 = Application.ActiveSheet
    plage.Copy Destination:=wS2.Range("A1")
    wS2.Range("R:AC").EntireColumn.Hidden = True

Si vous avez aussi besoin d'un mouchoir avec un noeud n'hésitez pas...

Bonjour Optimix,

C'est top ça marche nickel !! Merci beaucoup ! Je vais seulement rajouter une partie pour avoir le même dimensionnement des lignes et colonnes dans le fichier copie.

Mais encore merci !

Bien à toi,