Wie Pattern File Extensions Von Strings in Excel Macros Strip

Mitglieder-Login

InformationenMicrosoft Access

Ein Programm Evaluation Review Tech… Wie man ein PERT-Diagramm in Excel machen . Jeder Abschnitt des PERT-Diagramm kann individuell auf e
Wie man eine Rechnung in MS Excel E… Erstellen einer Rechnung in Excel erfordert die Eingabe relevanter Informationen über die Transaktio
Wie mehrere Makros in der gleichen … Wenn Sie ein Excel-Arbeitsblatt , die eine Menge von Makros verwendet erstellt haben, dann möchten S
Wie man ein Notenbuch in Excel erst… Dokumentieren Qualitäten ist eine zeitraubende Aufgabe für viele Lehrer . Da immer mehr Schulen EDV-

Software

HOME

* Computer Wissen >> Software >> Microsoft Access >> .

Wie Pattern File Extensions Von Strings in Excel Macros Strip

Sie können ganz einfach Streifenmuster Dateiendungen aus Zeichenfolgen in Ihrem Microsoft Excel -Anwendungen über Visual Basic für Applikationen oder VBA . VBA ist eine Programmiersprache, in Microsoft Office-Anwendungen verwendet, um Routineaufgaben wie das Entfernen von Datei-Erweiterungen automatisieren. Sie können ein Makro in Excel VBA-Code mit einem Klick auf eine Schaltfläche ausführen . Fügen Sie ein Makro im VB -Editor , indem Sie VBA -Befehle, wenn Sie das Makro ausführen ausführen . Anleitung
1

Starten Sie Microsoft Office Excel , klicken Sie dann auf "Entwickler " und " Visual Basic ", um den VB -Editor zu starten. Klicken Sie auf " Einfügen> Modul " ein neues Modul VBA-Code hinzufügen
2

Fügen Sie den folgenden Code, um eine neue Excel- Makro zu erstellen : .

Private Sub removeFileExtension ()

3

Definieren Sie zwei Integer-Variablen und den String -Array, das die Dateinamen halten wird :

Dim Dateiname (5) Als StringDim xCntr Wie IntegerDim pos As Integer
4

Schreibe einen Dateinamen in der String-Array :

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

erstellen Sie eine" For ... Loop " , um die pattern-Datei -Erweiterungen aus der Datei strippen Namen im Array :

xCntr = 0 To 4pos = InStr ( 1 , Dateiname ( xCntr ) , vbTextCompare ".") Dateiname ( xCntr ) = Left (Dateiname ( xCntr ) , pos - 1 ) Weiter xCntr
6

Schleife durch String-Array und zeigt die neuen Dateinamen in der ersten Spalte der Excel-Tabelle :

xCntr = 1 To 5Range ("A" . . & xCntr ) SelectRange ("A" & xCntr ) Wert = Dateiname ( xCntr - " . Makros" 1) Nächste xCntrEnd Sub
7

Schalter zurück zu Microsoft Excel und klicken Sie auf Input " removeFileExtension " und klicken Sie auf die Schaltfläche" Ausführen " , um das Makro auszuführen und fügen Sie die neuen Dateinamen ohne Erweiterungen.