Sélection d'un jour de la semaine
Résolu/Fermé
Raphifouille
Messages postés
3
Date d'inscription
lundi 17 octobre 2011
Statut
Membre
Dernière intervention
24 octobre 2011
-
24 oct. 2011 à 10:50
Raphifouille Messages postés 3 Date d'inscription lundi 17 octobre 2011 Statut Membre Dernière intervention 24 octobre 2011 - 24 oct. 2011 à 14:29
Raphifouille Messages postés 3 Date d'inscription lundi 17 octobre 2011 Statut Membre Dernière intervention 24 octobre 2011 - 24 oct. 2011 à 14:29
A voir également:
- Sélection d'un jour de la semaine
- L'indice n'appartient pas à la sélection vba - Forum VB / VBA
- Dans la table des matières de ce document, le chapitre 6 et ses 2 sections n'apparaissent pas. trouvez l'erreur dans la structure du document et corrigez-la. mettez à jour la table des matières. quel est le mot formé par les lettres en majuscules de la table des matières après sa mise à jour ? - Forum Word
- Mise a jour airpods - Guide
- Desactiver mise a jour windows 10 - Guide
- Mise a jour windows 11 22h2 - Guide
3 réponses
yacleouf
Messages postés
438
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
8 juin 2015
39
24 oct. 2011 à 11:08
24 oct. 2011 à 11:08
http://www.praxispro.fr/excel-performance/a/convertir-date-format-de-cellule/11308
ça te va ?
et personnellement j'ai pas torp compris ça :
ça te va ?
et personnellement j'ai pas torp compris ça :
j'ai mis cellules sous le format "jjjj jj"
michel_m
Messages postés
16593
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
7 mars 2023
3 291
24 oct. 2011 à 12:41
24 oct. 2011 à 12:41
Bonjour
essaies cette macro
essaies cette macro
Sub supprimer_dim_lun()
Dim fin As Integer, lig As Integer, jour As Date
'dernière ligne utilisée
fin = Columns("A").Find("*", , , , , xlPrevious).Row
'fige le déplacement de l'écran
Application.ScreenUpdating = False
'boucle "en remontant"
For lig = fin To 1 Step -1
jour = Cells(lig, "A")
If Weekday(jour) < 3 Then '<==> joursemen XL dim=1, lun=2
Rows(lig).Delete 'détruit la ligne
End If
Next
End Sub
Raphifouille
Messages postés
3
Date d'inscription
lundi 17 octobre 2011
Statut
Membre
Dernière intervention
24 octobre 2011
24 oct. 2011 à 14:29
24 oct. 2011 à 14:29
Merci beaucoup Michel, ça marche à la perfection
Raphifouille
Messages postés
3
Date d'inscription
lundi 17 octobre 2011
Statut
Membre
Dernière intervention
24 octobre 2011
24 oct. 2011 à 14:23
24 oct. 2011 à 14:23
oui c'est exactement ça
ça écrit en fait mardi 09 par exemple
ça écrit en fait mardi 09 par exemple