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

Probleme code vba sur cumul

  • Initiateur de la discussion Initiateur de la discussion kevin2109
  • 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 !

K

kevin2109

Guest
Bonjour,
j'ai crée un fichier de cumul avec condition de date en vba mais je galère pour le positionnement des données .
Si quelqu' un peu me donner une info ca m'aiderais bien .
Je voudrais que le range (caisse ) soit horizontale dans mon fichier cumul .
J ai essayer resize(1, 1) ca marche mais il me copie que le cell 1.

Voici le code

Private Sub Transfert_Click()
Dim Col As Byte
Col = Day(Range("journee")) + 3
Sheets("cumul.pe").Cells(Col, 2).Resize(1, 15) = Range("caisse").Value

End Sub

Merci d'avance
 

Pièces jointes

Bonjour Kevin

Là je ne te comprends pas. Dans le gestionnaire des noms tu met "journée" = I2 et la cellule est vide, ensuite dans la macro

Col = Day(Range("journee")) + 3. Déjà ce n'est pas Col mais Lig qu'il faut mettre, Col se réfère en général à Colonne et pas Byte mais Long.
Ensuite tu met +3, ce qui est normalement la ligne 5, alors que la 1ère date est en ligne 4??? 😕
 
Dernière édition:
La cellule i2= aujourdhui() je l ai laisser vide pour test date.
de base la feuille "cumul.pe" etait en colonne et on la changer en ligne .
pour le +3 c est ok il l'opère correctement je pense que il faudrait plutôt spécifier cells" b to p"

Private Sub Transfert_Click()
Dim Col As Long

Lig = Day(Range("journee")) + 3
Sheets("cumul.pe").Cells(Lig, 2).Resize(15, 1) = Range("caisse").Value



End Sub


Quesque tu en pense??
 
Re

Regarde mon précédent message. 😉 Et fait les tests.

EDIT: journée tu peux le mettre directement à I4. Mais de toute façon c'est faux, puisque la ligne doit être inscrite en face de la date.
Comme tu as fait, en changeant de date, tu va l'inscrire toujours à la même ligne.
 
Dernière édition:
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Code VBA
Réponses
10
Affichages
1 K
  • Question Question
Microsoft 365 Question code VBA
Réponses
2
Affichages
574
Réponses
10
Affichages
940
D
Réponses
4
Affichages
1 K
  • Question Question
Microsoft 365 îPb code VBA
Réponses
1
Affichages
660
  • Question Question
Microsoft 365 Cpier/coller en VBA
Réponses
7
Affichages
775
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…