Le monde de Windows : fofimafi Le Bistrot : seb corgan Réseaux : The Ghost Is Me Jeux et consoles : Selyzia, 1 utilisateur anonyme et 182 utilisateurs inconnus
Bonsoir,
Je souhaiterai realiser une macro sous excel qui me permettrai d'etablir des pointages horaire
il faudrait qu'elle fonctionne ainsi:
1-une phrase s'inscrit "heure de debut" 2-on rentre l'heure EX:7:15
3- heure de fin
4- on inscrit l'H de fin EX: 17:45
toute ces infos devront s'inscrire dans un tableau preformaté
--
Merci
bon ben puisque je ne peux repondre non je dirais que pas grand chose sinon rien...
j'ai tester il y a fort longtemps (office 95)
mais je suis assez bon eleve et je comprend vite
--
merci
'
ActiveCell.FormulaR1C1 = "Entrez l'heure de dépose" je voudrais q'une cellule me propose ceci, et tant que je n'ai pas de reponse ne continus pas Range("D6" ).Select
ActiveCell.FormulaR1C1 = "8:30" une fois inscrit mon heure la recopie dans une autre case puis s'efface pour marquer Range("D6" ).Select je n'ais pas trouver le systme pour inserer une pause tant que aucun text n'est frapper Selection.Copy
Range("I6" ).Select
ActiveSheet.Paste
Range("D6" ).Select
Application.CutCopyMode = False
Selection.ClearContents
Range("D5" ).Select
Selection.ClearContents
ActiveCell.FormulaR1C1 = "Entrez l'heure de reprise" cette phrase par exemple Range("D6" ).Select
ActiveCell.FormulaR1C1 = "13:30"meme chose que precedement, reocpie le contenu cellule dans une autre case Range("D6" ).Select
Selection.Copy
Range("J6" ).Select
ActiveSheet.Paste
ActiveSheet.Paste
Application.CutCopyMode = False
Range("K6" ).Select
ActiveCell.FormulaR1C1 = "=RC[-1]-RC[-2]"puis effectue la soustraction Range("L6" ).Select
ActiveCell.FormulaR1C1 = "=RC[-1]*4"et multiplie par 4 pour me donner le resultat Range("D5" ).Select
End Sub
[#009b63][/#009b63]
Utilise plutôt la balise [code] plutôt que [quote] pour du code, s'il te plaît.
Je crois que tu te fourvoyes. Excel n'est pas un atelier de génie logiciel. C'est un tableur. Calculer des trucs, même compliqués, ok, il sait faire. "Attendre" qu'une valeur soit saisie, bloquer son fonctionnement, ce n'est pas son but.
Bon, par contre, tu peux créer un formulaire (UserForm) et forcer l'enchaînement voulu.
Par ailleurs, pour réagir à l'entrée d'une valeur, tu peux utiliser Worksheet_Change.
houla !
je vais vite voir ce que cela donne et si je ne m'en sort pas, je pense que je laisserai tomber, surtout que que cela n'est pas primordial.
Merci quand meme
)
