Utiliser intégré dans le langage de programmation Visual Basic pour Applications, ou VBA d'Excel , pour remplacer une chaîne entre guillemets en utilisant la fonction Replace de cette langue. Cette fonction recherche pour une chaîne que vous spécifiez dans une chaîne plus grande, puis remplace la chaîne avec une troisième chaîne que vous fournissez. Notez que cette opération ne modifie pas la chaîne originale , mais émet une nouvelle chaîne , que vous pouvez capturer dans une nouvelle variable chaîne. Vous pouvez utiliser ce que vous avez appris dans ce projet afin de supprimer les guillemets superflus que les utilisateurs de vos programmes VBA entrent dans des tableurs . Instructions 1 Cliquez sur le bouton "Option" du menu "Fichier " , puis cliquez sur la commande « Personnaliser le ruban " dans le volet "Catégories" . Cliquez sur la case " développeur" pour indiquer que vous souhaitez afficher cet onglet , puis fermer toutes les boîtes de dialogue ouvertes. Excel va maintenant afficher l'onglet « Développeur ». Cette étape vous permet de pénétrer dans l'environnement de développement VBA via le bouton " Visual Basic " de l'onglet "Developer " de . 2 Cliquez sur l'onglet "Developer " , puis cliquez sur " Visual Basic " bouton pour entrer dans l'environnement de programmation VBA. Cliquez sur l' onglet "Insertion " dans l'environnement , puis cliquez sur la commande "Module" pour insérer une nouvelle fenêtre de saisie des déclarations VBA. 3 Coller la partie de programme suivante dans la fenêtre vous venez de créer. Ce fragment définit une variable de chaîne , et lui assigne une chaîne qui est entre guillemets . Le fragment utilise l'instruction Chr ajouter les guillemets . Si vous essayez d'ajouter les citations sans fonction d'aider comme Chr , l' environnement de développement signaler une erreur de syntaxe. La raison en est que le vérificateur de syntaxe VBA interprète chaque paire de guillemets littéraux comme nouvelle chaîne. Sous replaceQuotedString () Dim x , longerString , nouvelleChaine Comme Stringx = Chr ( 34) & "abc" & , Chr ( 34) End Sub 4 Collez le fragment de programme suivant après la dernière instruction "X =" dans le fragment précédent . Ce fragment fait missions de deux nouvelles chaînes . La première tâche consiste à la chaîne " longerString », et inclut la variable "X" avec ses guillemets. La fonction Replace effectue la deuxième mission, qui est de cette fonction remplace une chaîne d'une chaîne plus longue avec une autre chaîne longerString = " Nous allons remplacer cette chaîne :" " nouvelleChaine . ». & XnewString = Replace ( longerString , x, "abc" ) 5 Cliquez sur une déclaration dans le programme, puis appuyez sur " F8 " pour entrer dans le mode de fonctionnement des programmes d'une déclaration à la fois. Appuyez sur "F8" à plusieurs reprises jusqu'à ce que la déclaration avec " nouvelleChaine " est mis en évidence . 6 Passez votre souris sur la variable « longerString " . VBA permet d'afficher la valeur de la chaîne, ce qui inclut la variable X avec sa chaîne entre guillemets , "abc ". 7 presse "F8" à nouveau pour exécuter l'instruction Remplacer, et passez votre souris sur la variable « nouvelleChaine " . VBA afficher une chaîne avec la même valeur que " longerString », mais avec une nouvelle chaîne à la place de la partie "abc" cité . La nouvelle chaîne est " abc" sans les guillemets.
|