VBA Excel: comment créer un sub utilisant des parametres ?

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : VBA Excel: comment créer un sub utilisant des parametres ?

Kogug

:hello:

Je suis ultra débutant en VBA,
j'ai écrit mes premières ligne de code pour tester quelque chose de tout simple: remplir les 10 premières lignes de la premiere colone.
Je souhaite rendre le sub flexible et mettre des parametres pour choisir où débute et s'arrete le remplissage, quelquechose du genre fill(X,Y) par exemple.

Impossible de comprendre ou déclarer les parametres et comment les intégrer au code,
quelqu'un saurait-il m'expliquer ?

Voici mon code exemple

Citation :

Public Sub fill()
Dim intCount As Integer

With wksSh1
.Activate
For intCount = 1 To 10
.Cells(1, intCount)= "Test"
Next intCount
End With

End Sub

Merci par avance

Publicité

kiki29

Salut,voir l'aide en ligne d'Excel

Message édité par kiki29 le 26-04-2009 à 07:23:24

Kogug

j'ai bien sûr commencé par là + recherche google mais ça m'a plus embrouillé qu'autre chose.

kiki29

salut

Option Explicit

Private Sub Fill(X As String, Y As String)
Dim c As Range, Plage As Range
Set Plage = ShTst.Range(X & ":" & Y)
With ShTst
.Cells.Clear
For Each c In Plage
c = "Test"
Next c
End With
End Sub

Sub Tst()
Fill "B4", "C3"
End Sub

Message édité par kiki29 le 26-04-2009 à 10:18:39

Kogug

merci beaucoup !!!

FORUM HardWare.fr

Programmation

VB/VBA/VBS

VBA Excel: comment créer un sub utilisant des parametres ?

Sujets relatifs
[C] Créer un tableau + trier des données avant envoi	créer un fichier avec OutputStream
[Java] Externaliser les parametres dans un xml	créer projet à partir de code sous visual studio 2008 [10€!]
VBA - appeler une variable en concaténant un string et une variable	ecrire fichier en utilisant http
[outlook 2003] Formulaire personalisés : créer un bouton "Répondre"	creer un menu horizontal déroulant, comme sur ce site, css ou js?
VBA Excel 2003 vs Excel 2007
Plus de sujets relatifs à : VBA Excel: comment créer un sub utilisant des parametres ?

Page générée en 0.031 secondes