Si può facilmente togliere le estensioni dei file di pattern da stringhe nelle applicazioni di Microsoft Excel tramite Visual Basic, Applications Edition , o VBA . VBA è un linguaggio di programmazione utilizzato in applicazioni di Microsoft Office per automatizzare le attività di routine, come la rimozione di estensioni di file . È possibile creare una macro in Excel per eseguire il codice VBA con un clic di un pulsante . Aggiungi una macro in Visual Basic Editor , aggiungendo comandi VBA che vengono eseguite quando si esegue la macro . Istruzioni
1

lancio di Microsoft Office Excel , quindi fare clic su " Developer " e " Visual Basic " per lanciare il VB Editor. Fare clic su "Inserisci> Modulo " per aggiungere un nuovo modulo di codice VBA
2

Aggiungere il seguente codice per creare una nuova macro di Excel : .

Private Sub removeFileExtension ( ) per
3

definire due variabili intere e la matrice di stringhe che conterrà i nomi di file :

Dim fileName (5) Come StringDim xCntr Come IntegerDim Ruolo As Integer
4

Aggiungi i nomi di file per la matrice di stringhe :

fileName ( 0 ) = filename " myfile.xlsx " ( 1 ) = " myfile2.txt " nomefile ( 2) = " myfile3 . "nomefile ( 3) = " doc " fileName ( 4) = " myfile4.docx myfile5.xls "
5

Creare un " ciclo FOR ... " mettere a nudo le estensioni dei file di pattern dal file I nomi nella matrice :

xCntr = 0 Per 4POS = InStr ( 1 , fileName ( xCntr ) , vbTextCompare ".") fileName ( xCntr ) = Sinistra ( fileName ( xCntr ) , pos - 1 ) Successivo xCntr
6

loop attraverso la matrice di stringhe e visualizzare i nuovi nomi di file nella prima colonna del foglio di calcolo Excel :

xCntr = 1 To 5Range ( " a" . . & xCntr ) SelectRange ( " a" & xCntr ) Valore = nomefile ( xCntr - " . Macro " 1) Avanti xCntrEnd Sub
7

tornare a Microsoft Excel e fare clic su Input " removeFileExtension "e fare clic sul pulsante" Esegui " per eseguire la macro e aggiungere i nuovi nomi di file senza estensioni .