|
▼りる さん:
ありがとうございます。
早速試してみます。
ただ、参照設定しても名前つき定数を認識できない
のが不思議です。
>あんぽんたん さん、こんばんわ。
>
>>ExcelのVBA ProjectからWordを操作して
>>
>>(定義したWorkbook).Sheet(i)Cells(m,n).value = Selection.Information(wdActiveEndPageNumber)
>>あるいは
>>(定義したWorkbook).Sheet(i)Cells(m,n).value = Selection.InformationwdFirstCharacterLineNumber)
>>
>
>Excel VBAでは wdFirstCharacterLineNumber や wdActiveEndPageNumber
>は未定義です。
>
>なので、
>>> 名前つき定数を使用しないで直接数値を指定する。
>>> wdActiveEndPageNumber → 3
>>> wdFirstCharacterLineNumber → 10
>>
>>この場合、表記法は、
>>
>> MsgBox Selection.Information(3), vbInformation, "頁"
>>
>> MsgBox Selection.Information(10), vbInformation, "行"
>>
>
>で試してみてください。
|
|