Saisie de nombres
#1
Accro XLPages

Inscription: 25/11/2008

Messages: 174

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 12-04-2009 07h59
bonjour a tous

dans le tableau si dessous je voudrais inscrire les nombres dans les cases du haut et en cliquant sur enregistrer,que sa me les inscrives a la suite dans le tableau.
 
quelqu'un connait il une petite macro pour réaliser la manip.

merci d'avance
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#2
Accro XLPages

Inscription: 25/11/2008

Messages: 174

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 12-04-2009 08h01
pardon je n'ai pas mis le fichiers.
Pièce jointe:
xls suivi d'heures.xls   [ Taille: 31.00 Ko - Téléchargements: 547 ]
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#3
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 12-04-2009 10h01
Bonjour à tous,

Un essai avec possibilité d'effacer les données à archiver en enlevant le ' devant :
    '   .Range("C5:J5").ClearContents
 

Utilisation de :

Option Explicit

Sub Archivage()
Application.ScreenUpdating = 0
    With Sheets("Archives")
        .Range("C5:J5").Copy
        .Range("C65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
        .Range("A65536").End(xlUp).Offset(1, 0) = Date
    Application.CutCopyMode = False
     '   .Range("C5:J5").ClearContents
        .Range("C5").Select
    End With
End Sub



A+ à tous

Pièce jointe:
zip JC Suivi Heures.zip   [ Taille: 11.78 Ko - Téléchargements: 572 ]


Cordialement
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#4
Accro XLPages

Inscription: 25/11/2008

Messages: 174

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 12-04-2009 10h27
merci et bonjour JCGL

dans mon tableau je doit inscrire les heures manuellement dans la ligne du haut et en cliquant sur le boutons je voulais que sa me l'efface de la ligne de saisie pour me l'inscrire dans le tableau,car a therme le tableau risque d'etre tres longt et se systeme m'evitera a chaque fois de chercher la ligne dans le tableau.

encore merci pour toute to aide .
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#5
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 12-04-2009 10h41
Bonjour à tous,

Je pensais avoir été clair.

Si le code ne fonctionne pas, c'est, peut-être, parce que tu es sous XL 2007.

Si tu souhaites effacer la ligne de saisie enlève le ' devant

 '   .Range("C5:J5").ClearContents 
pour avoir
    .Range("C5:J5").ClearContents 

Ceci par Alt F11 et dans le Module 1

A+ à tous




Cordialement
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#6
Accro XLPages

Inscription: 25/11/2008

Messages: 174

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 12-04-2009 11h21

re JCGL

peut tu jeter un oeil au fichier il ne marche toujours pas?

merci



Pièce jointe:
xls suivi d'heures.xls   [ Taille: 44.50 Ko - Téléchargements: 621 ]
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#7
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 12-04-2009 11h36
Bonjour à tous,

Peux-tu essayer avec mon fichier ?

Tu as mis :

Option Explicit
Sub Bouton1_Clic()
Sub Archivage()
Application.ScreenUpdating = 0
    With Sheets("Archives")
        .Range("C5:J5").Copy
        .Range("C65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
        .Range("A65536").End(xlUp).Offset(1, 0) = Date
    Application.CutCopyMode = False
        .Range("C5:J5").ClearContents
        .Range("C5").Select
    End With
End Sub

Tu as deux appels de Macro : une par Bouton1_Clic et une par Archivage
Dans ton classeur, tu n'as pas de feuille nommée 'Archives'

Fais un essai avec mon classeur et si la présentation ne te convient pas, nous adapterons le code à ton classeur

A+ à tous


Cordialement
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#8
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 12-04-2009 12h00
Bonjour à tous,

Avec ton fichier et ta présentation

A+ à tous
Pièce jointe:
zip JC suivi d'heures.zip   [ Taille: 12.49 Ko - Téléchargements: 562 ]


Cordialement
Hors Ligne
Rapport   Haut 

Re: Saisie de nombres
#9
Accro XLPages

Inscription: 25/11/2008

Messages: 174

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 12-04-2009 12h27
merci beaucoup JCGL

a bientot a tous
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   3 Utilisateur(s) anonymes