Intégrer une chaine de caractere dans une formule. Fermé

Question

Bonjour à tous,

Je cherche à intégrer une chaine de caractère dans une fonction VBA.


Voici la fonction en question (sélection de plusieurs feuilles d'un classeur):

Sheets(Array("Page1", "Page3", "Pagexxx")).Select

Je souhaite générer une chaine de caractère variable en focntion des feuilles que je veux sélectionner pour l'intégrer dans ma fonction. comment faire?

merci de vos réponses

Frédéric


Configuration: Windows / Firefox 54.0

yg_be · Answer

bonjour, peut-être ainsi?
dim xxx as integer
dim mapage as string
xxx=123
mapage = "ceci n'est pas une chaîne de caractères variables"
Sheets(Array("Page1", mapage, "Page"+xxx)).Select

paul · Answer

Bonjour Frédéric,

Je te propose ce code VBA :

Option Explicit

Sub Essai()

Dim Feuilles, FX As Worksheet, chn As String
  Feuilles = Array("Page1", "Page3", "PageX")
  
  ' Sélection de 3 feuilles
  Worksheets(Feuilles).Select
  
  ' Générer la liste des feuilles
  For Each FX In ActiveWindow.SelectedSheets
    chn = chn & FX.Name & ", "
  Next FX
  chn = Left$(chn, Len(chn) - 2)
  
  ' Afficher la liste des feuilles
  MsgBox "Feuilles sélectionnées :" & vbLf & vbLf & chn
  
End Sub

Merci de me donner ton avis.

Cordialement

Intégrer une chaine de caractere dans une formule.

2 réponses

Discussions similaires