2010年1月24日 星期日

Excel-計算子網路位址

在電腦網路中若要設定固定IP,則必須設定子網路遮罩(如下表),作為判斷子網路之用。試著在Excel中寫一個可以說明子網路遮罩運作的試算結果。

建立如下的表格:

儲存格B3:=REPT("0",8-LEN(DEC2BIN(B1)))&DEC2BIN(B1)

將儲存格B3複製到C3:E3。

儲存格B4:

=IF(INT(I3/8)>=4,REPT("0",8),IF(INT(I3/8)>=3,REPT("1",32-I3)&REPT("0",I3-24),REPT("1",8)))

儲存格C4:

=IF(INT(I3/8)>=3,REPT("0",8),IF(INT(I3/8)>=2,REPT("1",24-I3)&REPT("0",I3-16),REPT("1",8)))

儲存格D4:

=IF(INT(I3/8)>=2,REPT("0",8),IF(INT(I3/8)>=1,REPT("1",16-I3)&REPT("0",I3-8),REPT("1",8)))

儲存格E4:

=IF(INT(I3/8)>=1,REPT("0",8),REPT("1",8-I3)&REPT("0",I3))

儲存格B5:

=IF(AND(--MID(B3,1,1),--MID(B4,1,1)),1,0)&IF(AND(--MID(B3,2,1),--MID(B4,2,1)),1,0)&IF(AND(--MID(B3,3,1),--MID(B4,3,1)),1,0)&IF(AND(--MID(B3,4,1),--MID(B4,4,1)),1,0)&IF(AND(--MID(B3,5,1),--MID(B4,5,1)),1,0)&IF(AND(--MID(B3,6,1),--MID(B4,6,1)),1,0)&IF(AND(--MID(B3,7,1),--MID(B4,7,1)),1,0)&IF(AND(--MID(B3,8,1),--MID(B4,8,1)),1,0)

儲存格G3:

=BIN2DEC(B3)&"."&BIN2DEC(C3)&"."&BIN2DEC(D3)&"."&BIN2DEC(E3)&"/"&I3

儲存格G4:

=BIN2DEC(B4)&"."&BIN2DEC(C4)&"."&BIN2DEC(D4)&"."&BIN2DEC(E4)

儲存格G5:

=BIN2DEC(B5)&"."&BIN2DEC(C5)&"."&BIN2DEC(D5)&"."&BIN2DEC(E5)

將儲存格B5複製到C5:E5。

其中用到的公式有:

(1)DEC2BIN()函數:將10進制數轉換為2進制數

(2)LEN()函數:計算字串的長度

(3)REPT()函數:重覆顯示某個字元

(4)INT()函數:取不大於的最大整數

(5)AND()函數:取兩個數的AND邏輯運算

(6)MID()函數:在一個字串中,從中間第n個字取m個字元

其中還用到以&符號來連接字元,而--MID()乃將MID取得的字元轉換為數字,以方便做AND運算。

沒有留言:

張貼留言

檢視其他文章

好康東東