-1

Excelでは、以下のようなコンテンツがあります。Excel の数式を使用して不要な情報をすべて削除する必要があります。-.pdf のみを保持します。

1-Abc.pdf は重要な内容を含む pdf です。

2-Def.pdf は、重要な内容を含む pdf です。

3-Ghi.pdf は、重要な内容を含む pdf です。

4-Jkl.pdf は重要な内容を含む pdf です。

以下のような私の最終結果。

1-Abc.pdf
2-Def.pdf
3-Ghi.pdf
4-Jkl.pdf

助けてください。以下にサンプルをアップロードしました。 http://www.4shared.com/file/w_BSr62W/Sample.html ?

4

1 に答える 1

0

基本的な考え方は以下です。

Sub TrimToFirstSpace()
    Dim strHolder As String
    Dim intSlicer As Integer

    strHolder = ActiveCell.Value
    intSlicer = InStr(1, strHolder, " ")

    strHolder = Left(strHolder, intSlicer - 1)
End Sub

必要に応じて、strHolder をActivecell.Valueまたは他の場所に配置できます。

于 2013-03-19T10:03:45.777 に答える