Uso di Excel built-in linguaggio di programmazione Visual Basic, Applications o VBA , in sostituzione di una stringa tra virgolette , utilizzando la funzione Replace di quel linguaggio . Questa funzione cerca una sottostringa specificata all'interno di una stringa , quindi sostituisce la sottostringa con una terza corda che fornite . Si noti che questa operazione non modifica la stringa originale , ma restituisce una nuova stringa, che è possibile catturare in una nuova variabile stringa . Puoi usare quello che hai imparato in questo progetto per rimuovere superflui virgolette che gli utenti dei vostri programmi VBA entrano in fogli di calcolo . Istruzioni
1
Fare clic sul pulsante "Opzioni" del menu "File" , quindi fare clic sul comando " Personalizza barra multifunzione " nel pannello "Categorie" . Fare clic sulla casella di controllo " Developer " per indicare che si desidera visualizzare tale scheda , quindi chiudere tutte le finestre di dialogo aperte . Excel ora visualizza la scheda " Sviluppo " . Questo passaggio consente di inserire l'ambiente di sviluppo VBA tramite il pulsante " Visual Basic " della scheda " sviluppatori" .
2 Fare clic sulla scheda "Sviluppatore " , quindi fare clic sul " Visual Basic " pulsante per accedere all'ambiente di programmazione VBA . Fare clic sulla scheda "Inserisci" all'interno dell'ambiente , quindi fare clic sul comando "Modulo" per inserire una nuova finestra per l'immissione di istruzioni VBA .
3
Incolla il seguente porzione di programma nella finestra di che avete appena creato . Questo frammento definisce una variabile stringa , e lo assegna una stringa che è tra virgolette . Il frammento utilizza l'istruzione Chr per aggiungere le virgolette . Se si tenta di aggiungere le virgolette senza una funzione di aiutare come Chr , l'ambiente di sviluppo segnalerà un errore di sintassi . Il motivo è che il controllore di sintassi VBA interpreta ogni coppia di virgolette letterale come una nuova stringa .
Sub replaceQuotedString ( ) Dim x , longerString , newString Come Stringx = Chr ( 34) & " abc " & , Chr ( 34) End Sub
4
Incollare il seguente frammento di programma dopo l'ultima istruzione "X =" nel frammento precedente . Questo frammento fa le assegnazioni di due nuove stringhe . Il primo incarico è alla stringa " longerString ", e include la variabile "X" con le sue virgolette. La funzione Replace esegue il secondo compito, che è quello di Questa funzione sostituisce una sottostringa di una stringa più lunga con un'altra stringa
longerString = " Andiamo a sostituire questa stringa : " " newString . » . & XnewString = Replace ( longerString , x , "abc" ) economici 5
Clicca alcuna dichiarazione nel programma , quindi premere "F8" per inserire la modalità di eseguire programmi di un'istruzione alla volta. Premere il tasto " F8" ripetutamente fino a quando la dichiarazione con " newString " è evidenziato .
6
passa il mouse sopra la variabile " longerString " . VBA visualizzerà il valore della stringa , che include la variabile X con la stringa tra virgolette , "abc ".
7
Comunicati "F8" di nuovo per eseguire l'istruzione Replace , e passa il mouse sopra la variabile " newString " . VBA visualizzerà una stringa con lo stesso valore di " longerString ", ma con una nuova stringa al posto della porzione citato "abc" . La nuova stringa è " abc " senza le virgolette .