4D View Pro:コードによる検索と置換

4D View Proのドキュメントを初期化する際、その中の値やタグを探し出し、4Dから発行されたデータに置き換える必要がある場合があります。今なら VP Findコマンドを使えば簡単です。このコマンドのおかげで、データ、数式、タグを見つけて、シート全体、または特定の部分のみを置き換えることができます!

その方法を探ってみましょう。

HDI VP検索

この VP Findコマンドを使えば、4D View Proドキュメントのテキスト、数式、タグの中から、指定した範囲内のテキスト値を検索することができます。

たとえば、セルのテキストに最初に現れる “Total” という単語を大文字と小文字を区別して検索したい場合、次のようにします。

$range:=VP All("ViewProArea")
// find the first cell that contains the word 'Total' in the current sheet
$result :=VP Find($range; "Total")
// Make the cell background yellow for the found cells
VP SET CELL STYLE ($result;New object("backColor"; "yellow"))

ここで、「合計」を含むすべてのセルを検索するために、検索を絞り込むことができます。 allプロパティを使って、「合計」を含むすべてのセルを検索することができます。

$range
VP SET CELL STYLE:=VP All("ViewProArea")
$condition :=New object
// Search in all values in the range
$condition .all:=True
// Find all cells containing the word 'Total' in the current sheet $result :=VP Find($range; "Total";$condition)
// Make the cell background yellow for the found cells
($result;New object("backColor"; "yellow"))

• もし、大文字小文字を区別せずに「合計」を検索したい場合は flagsプロパティを変更するだけです。

$range

:=VP All("ViewProArea")
$condition :=New object// Search the entire sheet
$condition .all:=True
// Search cells containing the word "Total" without considering the case $condition .flags:=vk find flag ignore case
// Find all cells containing only the word 'Total' in the current sheet $result :=VP Find($range; "Total";$condition)
// Make the cell background yellow for the found cells
VP SET CELL STYLE ($result;New object("backColor"; "yellow")))


• 見つかった「Total」の単語をすべて「4D」に置き換えたい場合は、置き換えテキストをパラメータに追加してください。

$range

:=VP All("ViewProArea")
$condition :=New object
// Search the entire sheet
$condition .all:=True
// Search cells containing the word "Total" without considering the case $condition flags :=vk find flag ignore case// Replace text in all cells containing only 'Total' with "4D"
$result :=VP Find($range; "Total";$condition; "4D")
// Make the cell background yellow for the found cells
VP SET CELL STYLE ($result;New object("backColor"; "yellow")))

もちろん、これらは、このコマンドで可能なことのほんの一部に過ぎません。 VP Findコマンドで可能になる可能性のほんの一部に過ぎません。

ワイルドカードを使った値の検索方法、数式での検索方法など、もっと詳しく知りたい方はdoc centerで検索してください。