VBA excel
Ferméf894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 - 28 févr. 2023 à 16:31
- VBA excel
- Liste déroulante excel - Guide
- Si et excel - Guide
- Aller à la ligne excel - Guide
- Word et excel gratuit - Guide
- Excel compter cellule couleur sans vba - Guide
3 réponses
25 févr. 2023 à 23:17
Bonjour,
colle en texte en utilisant la 8ème icone 'Insérer un extrait de code', une image n'est pas exploitable.
Ou mieux un fichier de travail réduit avec le pb.
C'est pour ça que pas grand ne s'intéressait...
= ActiveWorkbook sans s
pour gagner du temps et éviter ces erreurs, saisis le 1ères lettre et Alt+Espace te propose une liste de choix (Intellisense)
eric
28 févr. 2023 à 15:04
Bonjour Erilic,
Merci beaucoup, déjà pour ta réponse.( le s )
Voilà le code ci-dessous.
J'explique: je veux que le résultat( somme) de la cellule E,20 de la feuille1 de mon classeur soit copier automatiquement dans la cellule D,11 de la feuille2 du même classeur. Les 2 feuilles appartiennent au même classeur.
Quand je fais exécuter sub User/form, ça n'affiche pas d'erreur dans le code je sélectionne le classseur je fais exécuter rien ne se passe c'est à dire la copie ne se fait pas.
Pourriez-vous m'aider? Merci d'avance
-------- CODE---------
Sub copier_coller_celluleE20_feuil2()
Dim wk_fichier As Workbook
Dim ws_feuil1 As Worksheet
Dim ws_feuil2 As Worksheet
' definir les variables fichiers et onglets'
Set wk_fichier = ActiveWorkbook
Set ws_feuil1 = wk_fichier.Worksheets(1)
Set ws_feuil2 = wk_fichier.Worksheets(2)
' copier coller de la cellule'
ws_feuil2.Cells(4, 11) = ws_feuil1.Cells(5, 20)
End Sub
-----------------------------------------------------------
28 févr. 2023 à 16:31
Bonjour,
ws_feuil2.Cells(4, 11) = ws_feuil1.Cells(5, 20)
Avec ce code vous ecrivez le contenu de la cellule T5 dans le cellule K4
Cells(ligne, colonne)
Range("colonne ligne")