Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 empecher d'effacé une colonne

T

titeuf18100

XLDnaute Junior
Bonjour .dans la colonne S du fichier PARTICIPATION j’aimerais qu’on ne puisse pas effacé cette colonne .merci d’avance
 
Solution
Bonjour @titeuf18100

Dans la feuille [Participation] mettez ce code
VB: 
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, [S:S]) Is Nothing Then
    Application.EnableEvents = False
    Application.Undo
    Application.EnableEvents = True
    MsgBox "Vous ne devez pas toucher aux formules des cette colonne !", vbCritical, "OUPS..."
  End If
End Sub

Cela ne fonctionne que si les macros sont activées
Sinon il faut verrouiller la colonne et protéger la feuille

A+
Trier par date Trier par votes

wDog66

XLDnaute Occasionnel
Bonjour @titeuf18100

Dans la feuille [Participation] mettez ce code
VB: 
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, [S:S]) Is Nothing Then
    Application.EnableEvents = False
    Application.Undo
    Application.EnableEvents = True
    MsgBox "Vous ne devez pas toucher aux formules des cette colonne !", vbCritical, "OUPS..."
  End If
End Sub

Cela ne fonctionne que si les macros sont activées
Sinon il faut verrouiller la colonne et protéger la feuille

A+
 
Vote positif 0 Vote négatif
Solution

Phil69970

XLDnaute Barbatruc
Re

Et pour les totaux tu peux faire comme cela par exemple

Pour info un TS est un tableau structuré

Les tableaux structurés

Mise en forme automatique des tableaux, ajout automatique des fonctionnalités de filtre et de tri, modification de la syntaxe des formules, recopie automatique...
www.excel-pratique.com
 

Pièces jointes

  • Interdire suppression ssur TS V2.xlsm
    116.8 KB · Affichages: 5
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
@titeuf18100

Les lignes d'un TS s'incrémentent automatiquement ainsi que les formules associé sans que tu t'en occupes.
C'est un des avantages des TS (voir le lien de mon post précédent)

En créant des lignes vides tu fausses le fonctionnement du TS et si tu rajoutes des noms par exemple par macro il se rajouteront après les lignes vides !!!

Et si tu effaces toutes les lignes de ton TS et qu'ensuite tu ajoutes une ligne nouvelle tes formules qui sont dans ton TS seront automatiquement recrées c'est magique non !!!


Explique pourquoi tu as besoin de 125 lignes vides ?
 

Pièces jointes

  • Interdire suppression ssur TS V3.xlsm
    117.4 KB · Affichages: 6
Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc
Inactif
Bonjour,
Hello Phil
Si on sélectionne une cellule de la colonne S en dessous du TS, ça n'empêche pas la suppression de la colonne via clic droit (+ bug)
Je sais, faut être sacrément tordu, mais l'imagination est sans limite, n'est-ce pas?
Un petit test supp'?
Bonne apm
 
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
Bonjour @Cousinhub

Oui effectivement faut être un peu tordu dans ce cas là il faut contrôler toute la colonne S mais si il y a quelque chose ou au contraire je veux remplir une cellule sous le TS (colonne S) je ne peux plus supprimer ou modifier cette colonne.
Et si je déplace le TS alors je peux de nouveau supprimer la colonne des totaux !!!!
Mais je dois être tordu !!! MDR
 
Dernière édition:
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
De toute manière son code de USF est bancale pour moi il faudra mieux partir d'une liste sur USF ou l'utilisateur choisi le nom puis choisi les options ou tout simplement directement dans le TS "Tab Participation" l'utilisateur choisi ses options
 
Vote positif 0 Vote négatif
T

titeuf18100

XLDnaute Junior
Bonjour. Vous m’avez fait un fichier il y a quelque temps, il marche à merveille.

J’aimerais ajouter 6 nouvelle ongler . secteur 1 2 3 4 5 6 .

Quand je les rajoute dans l’ongler LISTE . J’ai une erreur d’exécution 1004.

Je vous joint le fichier . merci de votre aide.

Cordialement.
 

Pièces jointes

  • championnat du cher .xlsm
    143.4 KB · Affichages: 3
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
Bonjour à tous

@titeuf18100

Comme j'aime pas me répéter et je vois que tu as rajouté des lignes vides
Phil69970 à dit:
Pas de ligne vide dans un TS
Cliquez pour agrandir...

Phil69970 à dit:
Explique pourquoi tu as besoin de 125 lignes vides ?
Cliquez pour agrandir...

Comme je vois que je n'ai aucune erreur contrairement à tes dire
titeuf18100 à dit:
Quand je les rajoute dans l’ongler LISTE . J’ai une erreur d’exécution 1004.
Cliquez pour agrandir...



Comme je vois que tu as posé aussi ta question ici

Comme aujourd'hui je me suis lever du pied gauche pas de bol pour toi

Pour toutes ces raisons cela sera sans moi aujourd'hui

Bonne lecture
 
Vote positif 0 Vote négatif
T

titeuf18100

XLDnaute Junior
désolé d'avoir poster sur le forum .mais se n'etait pas prevu que je modiffie le tableau . nous vennon de changé de president .et il me demande le fichier pour se soir . les ligne vide c que j'ai effacer la base de donnée.
cordialement .
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

V
  • Question
XL 2021 ListeBox avec plusieurs colonnes
Réponses
8
Affichages
331
vmax67
V
V
  • Question
Autres Facture - Remplissage auto depuis la base de données
Réponses
3
Affichages
229
chris
M
  • Question
XL 2019 étirer liste déroulante
Réponses
10
Affichages
453
milckush
M
  • Question
Microsoft 365 Variable tableau : coller uniquement une partie des colonnes
2 3
Réponses
31
Affichages
1 K
BenHarber
N
  • Question
Microsoft 365 Tableau calcul entre deux dates
Réponses
1
Affichages
172
job75
S
  • Question
XL 2013 répartitions frais
Réponses
8
Affichages
553
vgendron
A
  • Résolu(e)
XL 2019 Colonne 'AutoIncrement' avec condition
Réponses
6
Affichages
205
amgue
A
T
  • Question
Microsoft 365 Afficher des résultats d'une colonne sur une ligne
Réponses
3
Affichages
96
toto142
T
F
  • Question
Microsoft 365 Problème de compatibilité entre Microsoft 365 (office) et 2007 en VBA
Réponses
8
Affichages
365
TooFatBoy
I
  • Résolu(e)
XL 2021 Somme cellule a droite du critère 1 ligne plusieurs colonnes
Réponses
5
Affichages
183
Idealnight
I
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…