XL 2016 copier des cellules verrouillées sans codes

papacorno · 3 Mars 2021

Bonsoir la team, j'ai reçu un fichier excel avec des cellules qui sont verrouillées (Une base de données). Je précise qu'à part les titres de colonnes , toutes les cellules sont vides.
Afin de pouvoir travailler sur ce fichier , je souhaiterais faire un copier/coller de l'ensemble du tableau avec tous ses formats y compris les listes de menu déroulantes sinon je vais devoir recréer ce tableau.
Un coup de pouce ne serait pas de refus, merci d'avance.
Bonne soirée

sylvanu · 3 Mars 2021

Bonsoir Papacorno,
S'il n'y a pas d'autres protection de la feuille que le classique mot de passe, tentez ceci :
1- Vous sélectionnez toute la feuille avec
2- Vous faites Copier
3- Vous sélectionnez une nouvelle feuille vierge, ou dans un nouveau classeur, cliquez en A1 et faire coller.
Normalement ça marche, cela copie tout contenu et format.

Laurent78 · 3 Mars 2021

Bonsoir à tous,
Vous pouvez aussi dupliquer l'onglet.
Je ne vois pas très bien ou est le problème, n'hésitez pas à joindre le fichier anonymisé, mais vu qu'il est vide ....
Bonne soirée

sylvanu · 3 Mars 2021

Re,
@laurent, si on duplique une feuille qui a un mot de passe, on se retrouve avec une feuille qui a un mot de passe.

papacorno · 3 Mars 2021

Bonsoir, Je pense qu'il y a d'autre protection car je ne peux pas sélectionner la case en haut à gauche qui sélectionne toute la feuille.

Staple1600 · 3 Mars 2021

Bonsoir le fil

[Pour infos, et de passage]

la charte du forum¸ mis à jour récemment à dit:
9 - Les demandes de "déprotection" de classeurs Excel sont interdites quelle que soit la raison.

Mieux vaut s'en rappeler avant de poser sa question.

papacorno · 3 Mars 2021

Staple1600 à dit:
Bonsoir le fil

[Pour infos, et de passage]

Mieux vaut s'en rappeler avant de poser sa question.

Bonsoir,
oup's autant pour moi je ne savais pas .
Je retire ma demande même si mon tableau est vierge de données...
Cordialement

job75 · 3 Mars 2021

Bonsoir,

Bah JM, ce n'est pas une demande de déprotection, c'est juste une demande de copie !!!

Et avec une macro pas besoin de sélectionner les cellules :

VB:

Sub Copier()
Dim fichier$
fichier = ThisWorkbook.Path & "\Source.xlsx" 'à adapter
If Dir(fichier) = "" Then MsgBox "Fichier Source.xlsx introuvable...": Exit Sub
Application.ScreenUpdating = False
With Workbooks.Open(fichier).Sheets(1) 'ouvre le fichier
    .Cells.Copy Feuil1.[A1] 'copie-colle toutes les cellules
    Feuil1.[A1].Copy Feuil1.[A1] 'allège la mémoire
    .Parent.Close False 'ferme le fichier
End With
End Sub

A+

Staple1600 · 3 Mars 2021

Bonsoir job75

Bonsoir la team, j'ai reçu un fichier excel avec des cellules qui sont verrouillées (Une base de données).

Bah, dans ce cas, contactez l'expéditeur de mail pour demander le mot de passe.

Pour le reste c'était simplement informatif.
D'où le:
[Pour infos, et de passage]

Laurent78 · 4 Mars 2021

job75 à dit:
Bonsoir,

Bah JM, ce n'est pas une demande de déprotection, c'est juste une demande de copie !!!

Et avec une macro pas besoin de sélectionner les cellules :

VB:

Sub Copier() Dim fichier$ fichier = ThisWorkbook.Path & "\Source.xlsx" 'à adapter If Dir(fichier) = "" Then MsgBox "Fichier Source.xlsx introuvable...": Exit Sub Application.ScreenUpdating = False With Workbooks.Open(fichier).Sheets(1) 'ouvre le fichier .Cells.Copy Feuil1.[A1] 'copie-colle toutes les cellules Feuil1.[A1].Copy Feuil1.[A1] 'allège la mémoire .Parent.Close False 'ferme le fichier End With End Sub

A+

sylvanu à dit:
Re,
@laurent, si on duplique une feuille qui a un mot de passe, on se retrouve avec une feuille qui a un mot de passe.

Bonjour,
Moi j'avais compris qu'il voulait copier, pas de déprotéger quoique ce soit

XL 2016 copier des cellules verrouillées sans codes

papacorno

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Laurent78

XLDnaute Occasionnel

sylvanu

XLDnaute Barbatruc

papacorno

XLDnaute Nouveau

Staple1600

XLDnaute Barbatruc

papacorno

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Pièces jointes

Staple1600

XLDnaute Barbatruc

Laurent78

XLDnaute Occasionnel

Discussions similaires