Top > OOoBasic > Calc > substituent

置換 Edit

OOo Basic を使って置換してみます。

置換は検索に似ています。

準備 Edit

置換するためには ReplaceDescriptor が必要です。これはシートオブジェクトから createReplaceDescriptor メソッドを使って取得します。

Sub Main
Dim oDoc As Object
Dim oSheet As Object
Dim oReplaceDes As Object

  oDoc = ThisComponent
  oSheet = oDoc.getSheets().getByIndex(0)
  oReplaceDesc = oSheet.createReplaceDescriptor()
End Sub

検索文字列 Edit

検索する文字列は SearchString プロパティーに設定します。

 oSearchDesc.SearchString = "found"

検索に正規表現を使用したいときは正規表現をこの文字列に指定します。また,正規表現を使用するように, SearchRegularExpression プロパティーを true に設定します。

oSearchDesc.SearchRegularExpression = true

正規表現についてはここでは説明しないことにします。

置換文字列 Edit

置換後の文字列は ReplaceString プロパティーに設定します。

 oReplaceDesc.ReplaceString = "replaced"

検索オプション Edit

単語単位 Edit

単語単位での置換を行いたいときは SearchWords プロパティーを true に設定します。

oSearchDesc.SearchWords = true

大文字と小文字の区別 Edit

大文字と小文字を区別して置換したいときは SearchCaseSensitive プロパティーを true に設定します。

 oSearchDesc.SearchCaseSensitive = true

範囲内の置換 Edit

OOoBasic/Calc/sheetcellranges 参照。


Reload   New Lower page making Edit Freeze Diff Upload Copy Rename   Front page List of pages Search Recent changes Backup   Help   RSS of recent changes