バブル２世の猫バカＳＥ録

XML読み込みのときのselectSingleNode関数のnodeTypedValueは、 簡単に1行で目的のデータが取得できるので、便利に使っているのですが、データーがないときのエラー処理ができません。
戻り値には、何もエラー処理できる値が入ってきません。
それで、以下のようにしてみました。
selectSingleNode関数でnodeTypedValueを使う前に、selectSingleNode関数の戻り値を判断し、 Nothing のときは、データがないということで処理することができました。

' DOMドキュメント宣言
Private source As DOMDocument
Sub XML読み込み()
Set source = New DOMDocument
source.async = False
Dim mnode As MSXML2.IXMLDOMNode
source.Load ("http://xxx.mmm.lll.com/test.xml)
Set mnode = source.selectSingleNode("//データ")
If mnode Is Nothing Then
msg "データがありません。"
Else
xxxx = source.selectSingleNode("//データ").nodeTypedValue
End If
End Sub

VBのMID関数は、
文字列 の開始位置 から文字数 分の文字列を取り出す関数で、
Mid(文字列, 開始位置 [, 文字数])
で指定しますが、長さを省略すると後ろすべてを返します。

たとえば、
Mid("abcdefg",3)
とすると、
cdefg
が返ってきます。

今まで、Len関数とRight関数で求めていましたが、
Mid関数を使うと、すごく簡単に求められることが解りましたので・・・

 

 

Excel で改ページをするには、改ページさせたい位置を選択し、メニューより「挿入→改ページ」を選択すると、任意の位置で改ページできますが、それをクリアさせる方法がわからず困っていました。

 

ぐぐってみたら、ありました。

まず、メニューより「表示→改ページプレビュー」を選択します。

 

そして、任意のセルを右クリックし、「すべての改ページを解除」を選択するとクリアされました。

 

やはり、Excelで困ったときは、まず、右クリックですね。

 

 

 

 

Excelで1行おき（1個とび、偶数行・奇数行）のセル数値の合計は、

=SUM(IF(MOD(ROW(C3:C6),2)=1,C3:C6,0))

というような式で可能ですが、上記の式の意味がわかっていれば、
これを応用して2個とび、3個とびの合計も可能です。

ROW(C3:C6)
というのは、C3からC6の範囲の行位置を返します。

MOD
は、余剰を求める関数なので、
MOD(ROW(C3:C6),2)
は、C3からC6の範囲の行位置を2で割った余りを返します。
つまり、
MOD(ROW(C3:C6),2)=1
は、C3からC6の範囲の行位置を2で割った余りが1が条件ということです。
C3、C5が条件に当てはまります。
MOD(ROW(C3:C6),2)=2
とすると、2で割り切れる行位置で、
C4、C6が当てはまります。

これを応用して、2個とびの合計は、
MOD(ROW(C3:C6),3)
とし、3個とびの合計は、
MOD(ROW(C3:C6),4)
として、余りの値に合致する行位置を合計できます。

NEC ノート VY16F/RX-R の再セットアップをしようと

「再セットアップ用CD-ROM(1枚目)」をドライブに入れ再起動しても、

再セットアップが始まりません。

活用ガイド（再セットアップ編）をよく読むと、

「アプリケーションCD-ROM」を入れろと書いてあるじゃないですか。

付属品を探したら、「アプリケーションCD-ROM」がありました。

 

「アプリケーションCD-ROM」をドライブに入れ再起動したら、

再セットアップが開始されました。。。ほっ