Bonjour,
Je suis débutante en VB et requiers un peu d'aide:
Je souhaite, par le biais d'un bouton de commande, ouvrir un tableau Excel dans lequel j’insérerai des valeurs.
Le tableau type est joint en .JPG.
Voici le code :
Si vous avez besoin du classeur pour plus de facilités, je le joins également.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Private Sub SPL_reverberation_click() Sheets("add").Range("B50").Value = "reverberation" Sheets("add").Range("B51").Value = Me.Num_project.Caption Me.Hide Sheets("add").Range("A:A").EntireColumn.Hidden = True Sheets("add").Send_SPL.Visible = True Sheets("add").Cancel.Visible = True Sheets("add").Range("C130").Value = "Update" 'Copy the table for the SPL Sheets("Search").Range("CA16:CB40").Copy Sheets("add").Range("C12:D37").PasteSpecial Sheets("add").Activate End If End Sub
Merci à tous, à bientôt.
Partager