Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Re : Conversion format hh:mm:ss en nombre de jours
Je vois clair dans votre jeu mais malheureusement pour vous je ne suis pas un bon adversaire. Je ne manquerais pas de faire à l'avenir un bon coup de pub pour excel download...
Au revoir
Re : Conversion format hh:mm:ss en nombre de jours
Bonjour tototiti, j'ai pas encore le réflexe de travailler avec les N° de série pour la gestion dates/heures. Ca vient mais progressivement, en premier lieu j'écris une formule tangible pour tout publique.
Ce qui ramène à votre signature ...
Re : Récupérer dans une variable une date présente dans la cellule d'un fichier...FER
Si vous avez un temps d'ouverture de fichier > 5 minutes c'est tout a votre honneur de chercher a minimiser les temps d'attentes.
Re : Creation d'un fichier par valeur contenu dans une colonne
Il existe des différences entre le fichier présenté et la réalité. N'ayant pas accès à cette dernière, c'est à vous d'adapter.
Re : Récupérer dans une variable une date présente dans la cellule d'un fichier...FER
Bonjour, ici un lien pour lire les classeurs fermés. Lire et écrire dans les classeurs Excel fermés
Sinon...
workbooks.open adresse du fichier
variable = workbook(bbb)...
worbooks(fichier).close
Non ?
Re : Sélection colonnes via input box à l'aide de la souris
Avec une inputbox et avec la souris je n'ai pas de solution à proposer. Avec une inputbox ce qui se rapproche c'est ceci.
Sub Bouton1_Clic()
b = Split(InputBox("indiquez la/les lettre(s) des colonnes séparées par des points...
Re : Garder seulement les ignes contenant....
Sub trouvetout()
Dim trouve As Range
If Feuil1.[a1] <> "" Then Feuil1.[a1].Insert shift:=xlDown
With Feuil1.[a1:a2000]
Set trouve = .Find("COURSE N", LookIn:=xlValues, lookat:=xlPart)
If Not trouve Is Nothing...
Re : Renvoi de données d'une feuille vers une autre en fonction de la date du jour.
Bonjour.
Sub macro1()
Dim db&
db = CLng(Now())
For i = 2 To Feuil2.UsedRange.Rows.Count
If CLng(Feuil2.Range("a" & i)) = db Then
Feuil1.[a2:b2].Copy Feuil2.Range("b" & i)
End If
Next
End Sub
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.