マリノスはCSVファイルをよく扱います。彼の場合、CSVファイルはカスタムアプリケーションによって作成されており、数式を含めることもできることがわかりました。したがって、CSVファイルの行に「,,, Total:、= SUM(D5:D13),,,,」が含まれている場合、数式が評価され、すべて問題ありません。

ただし、Marinosがやりたいことの1つは、個々のセルをExcelにインポートした後にどのように位置合わせするかをCSVファイルで示すことです。

彼は、Lotus 123で、セルの配置を示すために接頭文字を使用できることを覚えているようです( ‘は左、^は中央、 “

は右)。彼は同じ機能が優れていると考えています。 Excel。

Excelでこれを行う方法はありません。インポートされたデータの配置は、テキストが左寄せ、数値が右寄せなど、システムのデフォルトに基づいています。ただし、1つのオプションです。 、はプレフィックス文字を追加し、後でマクロで「解析」して目的の配置を適用できます。たとえば、左に「<」、中央に「^」、右に「>」を使用できます。 ExcelがCSVファイルをインポートすると、フィールドはテキストとして扱われます。次に、このマクロを実行して先頭の配置文字を検索し、目的のアクションを実行できます。

Sub SetJustification()

Dim rCell As Range

For Each rCell In ActiveSheet.UsedRange         With rCell             Select Case Left(.Value, 1)

Case "<"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignLeft                 Case "^"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignCenter                 Case ">"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignCenter             End Select         End With     Next     Set rCell = Nothing End Sub

マクロはワークシートの各セルをチェックします。セルが配置文字で始まる場合、文字は削除され、適切な配置は次のようになります。適用されます。

注:

このページ(または_ExcelTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント(3131)は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel(Excel 2007以降)のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。