Ceci ajoutera une variable de feuille de travail (la déclarer comme feuille de travail sur le dessus), avec un « lecteur » nommé où en cellules A1 à A3 vos données sont notées par l'utilisateur et emploient alors les valeurs des cellules dans la corde.
'Déclarer ReadingSheet
L'ensemble a lu = des feuilles de travail (le « lecteur »)
sSql = « compagnie distincte choisie, accounting_year, compte, account_desc, » et _
« somme (amount_balance) plus de (CLOISON PAR ordre de compte par précéder illimité de gamme de compte) comme cumulatif » et _
« de l'accounting_balance_auth » et du _
« où compagnie = « » et ReadS.Range (« A1 ») et » » « et _
« et accounting_year = « » et ReadS.Range (« A2 ») et » » « et _
« et accounting_period <> « ordre par 3 »