VBA : Enregistrement de données à suivre dans une base
Résolu/Fermé
A voir également:
- VBA : Enregistrement de données à suivre dans une base
- Incompatibilité de type vba ✓ - Forum Programmation
- Vba attendre 1 seconde ✓ - Forum VB / VBA
- Vba dernière colonne non vide ✓ - Forum VB / VBA
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
- Mkdir vba ✓ - Forum VB / VBA
2 réponses
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
8 janv. 2013 à 19:23
8 janv. 2013 à 19:23
Bonjour,
Un peu plus court,
Un peu plus court,
Sub saisie() With Sheets("Base") 'premiere ligne vide colonne A (A1: titre colonne) plva = .Range("A" & Rows.Count).End(xlUp).Row + 1 .Range("A" & plva & ":F" & plva) = Application.Transpose(Sheets("Formulaire").Range("B1:B6")) End With 'Rendre vierge le formulaire Sheets("Formulaire").Range("B1:B6").ClearContents End Sub