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

Effacer des cellules sous conditions + remonter des données

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Sebiwan67
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
S

Sebiwan67

XLDnaute Nouveau
Bonjour,

Je suis novice en la matière c'est donc pour cela que je passe par ce forum car j'ai besoin d'aide.

Je réalise actuellement un fichier assez complexe pour calculer des indicateurs Sécurité Santé Environnement et j'aurais besoin pour un tableau spécifique de réaliser les actions suivantes quand on appui sur un bouton :
(Voir fichier joint, ce fichier est un exemple)


1- Effacer les celulles des colonnes Nom, Date de début et Date de fin (la colonne soit est une formule, donc pas besoin de l'effacer) si l'année de la date de fin est égale à l'année en cours sélectionnée -2 (donc ici si on choisit l'année en cours 2014 on doit effacer les cellules pour année date de fin = 2012.

2- Une fois les cellules effacées, les autres données non effacées doivent être remontées afin qu'il n'y ait pas de cellules vides dans le tableau.

J'espère avoir été clair 🙄

Merci d'avance pour votre aide.

Bonne journée
 

Pièces jointes

Trier par date Trier par votes
Re : Effacer des cellules sous conditions + remonter des données

Bonjour

Avec ce code à tester dans un module VBA

Code: 
Sub efface()

Dim LastLine As Integer

LastLine = Range("A4").End(xlDown).Row

For i = LastLine To 5 Step -1
    If (Year(Cells(i, 3)) = Year(Now) - 2) Then
        Rows(i).Delete
    End If
Next i
  
End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

B
  • Question Question
XL 2021 [Résolu] Calculer une valeur tenant compte de cellules de valeur '0'
Réponses
5
Affichages
190
Bibinaire
B
M
  • Question Question
Autres colorer des cellules en incluant 2 formules
Réponses
2
Affichages
223
mcl
M
O
  • Résolu(e)
Microsoft 365 Amélioration/réparation d'une Macro et création d'un bouton pour calcul consommation
2
Réponses
27
Affichages
1 K
Olihoes
O
M
  • Question Question
XL 2021 Fichier de suivi avec liens et formules
Réponses
4
Affichages
250
Mily74
M
S
  • Question Question
Microsoft 365 Consolider des données de plusieurs feuilles
Réponses
2
Affichages
225
Sissou71
S
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
193
AtTheOne
K
  • Question Question
Microsoft 365 création mot passe classique avec un code
Réponses
1
Affichages
333
Gégé-45550
D
  • Résolu(e)
XL 2021 Selection listview et Envoie Emails automatique
Réponses
4
Affichages
318
delsart59
D
S
  • Question Question
Microsoft 365 Colorer automatiquement des cellules en les sélectionnant
Réponses
5
Affichages
551
Jacky67
  • Résolu(e)
Microsoft 365 VBA Insertion du numéro de semaine de manière dynamique
Réponses
11
Affichages
366
Etoto
A
  • Question Question
XL 2021 Calculer le prorata d'un objectif en fonction de l'arrivée ou du départ du salarié
Réponses
4
Affichages
220
job75
E
  • Question Question
XL 2016 Calcul cellules vides sous conditions multiples
Réponses
8
Affichages
625
DJunqueira
D
  • Question Question
XL 2016 Gestion de Fuites d'un Parc de Compteurs
Réponses
6
Affichages
362
Captain NRJ
POWERQUERY :: LES DATES REMARQUABLES
Réponses
5
Affichages
268
oguruma
A
  • Question Question
XL 2016 Fusion cellules via VBA
Réponses
3
Affichages
685
fanfan38
  • Résolu(e)
Microsoft 365 Programme de lecture d'un très gros livre (3 différents livres par semaine et un chapitre de chaque par jour)
2
Réponses
18
Affichages
836
crocrocro
C
R
  • Question Question
XL 2010 Copier des lignes de données de plusieurs feuilles dans une seule
Réponses
6
Affichages
657
AtTheOne
A
  • Résolu(e)
Microsoft 365 cumuler des valeurs de cellules dont l'emplacement peut varier dans des tableaux
Réponses
4
Affichages
557
auloin
A
M
  • Résolu(e)
XL 2013 Macross supprimant les données de cellule en dehors d'une période définie dans deux autres cellules
Réponses
9
Affichages
632
MarineU
M
M
  • Question Question
Microsoft 365 Pb de formules qui se modifient dans des cellules verrouillées
Réponses
14
Affichages
789
TooFatBoy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…