Page 15 of 54« First...510...1314151617...2025303540...Last »

★゜・。。・゜゜・。。・゜☆ 2010年04月02日 ☆゜・。。・゜゜・。。・゜★

【PC】Firefoxを3.6.3にしました。

ところで、

Net Applications、3月のブラウザ利用シェアを発表–「Chrome」が最大の伸び – builder by ZDNet Japan

っていうのは、たぶんそうだろうな～、と分かるんですが、
この記事↓の最後の行に驚きましたw(ﾟдﾟ!）Ｗ

(続きを読む…)

Filed under: ★科学、技術、ＰＣなど　　タグ: , , , , , 　　charlie432 13:13  Comments (0)
★゜・。。・゜゜・。。・゜☆ 2010年03月28日 ☆゜・。。・゜゜・。。・゜★

【VB】備忘録 3/25, 26

自分があとで見るための覚え書きです。


====== ３／２５ ======


★Redim（復習）
配列の再定義のとき、要素をリセットしない場合は、「Preserve」をつける。ReDim Preserve A(i) As String


====== ３／２６ ======


★テキストボックス
・入力データの取得－ValueプロパティRange("A1") = TextBox1.Value

・あらかじめ表示文字を設定する－TextプロパティTextBox1.Text = "ここに入力してください｡"

・日本語入力のオンオフ設定－IMEModeプロパティTextBox1.IMEMode = fmIMEModeOn＜IMEModeプロパティの定数＞
定数 値 内容
—————————————————————————————-
fmIMEModeNoControl 0 IME のモードを変更しない (既定値)。
fmIMEModeOn 1 IME をオンにする。
fmIMEModeOff 2 IME をオフにして英語モードにする。
fmIMEModeDisable 3 IME をオフにする。このモードにするとユーザーは、キー操作によっても IME をオンにすることができなくなる。
fmIMEModeHiragana 4 全角ひらがなモードで IME をオンにする。
fmIMEModeKatakana 5 全角カタカナ モードで IME をオンにする。
fmIMEModeKatakanaHalf 6 半角カタカナ モードで IME をオンにする。
fmIMEModeAlphaFull 7 全角英数モードで IME をオンにする。
fmIMEModeAlpha 8 半角英数モードで IME をオンにする。
fmIMEModeHangulFull 9 全角ハングル モードで IME をオンにする。
fmIMEModeHangul 10 半角ハングル モードで IME をオンにする。

・入力文字数に制限を加える－MaxLengthプロパティTextBox1.MaxLength = 25

・入力文字を伏字にする－PasswordCharプロパティTextBox1.PasswordChar = "*"

・複数行の入力・表示を行う－MultiLineプロパティTextBox1.MultiLine = True

・スクロールバーを表示させる－ScrollBarsプロパティTextBox1.ScrollBars = fmScrollBarsBoth＜ScrollBarsプロパティの定数＞
定数 値 内容
——————————————————
fmScrollBarsNone 0 スクロール バーを表示しない (既定値)。
fmScrollBarsHorizontal 1 水平スクロール バーを表示する。
fmScrollBarsVertical 2 垂直スクロール バーを表示する。
fmScrollBarsBoth 3 水平・垂直スクロールバーの両方を表示する。



★型の基本情報

データ型名称・読み方小数負数正確値の範囲
Booleanブール型
ブール		---True または False
Byteバイト型
バイト		××○0 ～ 255
Char文字型
キャラ		---1文字(Unicode)
※数値に変換すると0 ～ 65535ですが数値用ではありません。
Short短整数型
ショート		×○○-32768 ～ 32767
Integer整数型
インテジャー		×○○-2147483648 ～ 2147483647
Long長整数型
ロング		×○○-9223372036854775808 ～ 9223372036854775807
SByte符号付バイト型
エスバイト		×○○-128 ～ 127
(VB2005以降)
UShort符号なし短整数型
ユーショート		××○0 ～ 65535
(VB2005以降)
UInteger符号なし整数型
ユーインテジャー		××○0 ～ 4294967295
(VB2005以降)
ULong符号なし長整数型
ユーロング		××○0 ～ 18446744073709551615
(VB2005以降)
Decimal10進型
デシマル		○○○※小数の桁数によって異なります。

・小数の桁数が0の場合
-79228162514264337593543950335 ～ 79228162514264337593543950335

・小数の桁数が28桁の場合
-7.9228162514264337593543950335 ～ 7.9228162514264337593543950335

・一番細かい値(分解能)
0.0000000000000000000000000001

Single単精度浮動小数点型
シングル		○○×-340282350000000000000000000000000000000
～ 40282350000000000000000000000000000000

一番細かい値(分解能)
0.00000000000000000000000000000000000000000001401298

Double倍精度浮動小数点型
ダブル		○○×-17976931348623157000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
0000000000000000000000000
～
179769313486231570000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000

一番細かい値(分解能)
0.00000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000494065645841246544

Date日付型
デイト		---0001年1月1日 0:00:00 ～ 9999年12月31 日 23:59:59
Objectオブジェクト型
オブジェクト		---(任意の型を格納できます)
String文字列型
ストリング		---0 個 ～ 約 20 億個の文字 (Unicode)

小数 … 小数が表現できるかを示しています。数値型以外の型には関係ありません。

負数 … 負の数(ゼロより小さい数、マイナス)が表現できるかを示しています。数値型以外の型には関係ありません。

正確 … 正確な値を示すことができるかを表しています。×の場合は値に誤差が発生します。金額の計算など値の正確さが重要な場合はこの項目が×になっている型(Single, Double)は使用しないでください。数値型以外の型には関係ありません。




★変数の宣言と初期化、有効(適用)範囲
モジュールレベルの変数
プロシージャ内部での宣言ではなく、モジュール内でプロシージャが始まる前(上)に記述する変数です。（中略）モジュールレベルの変数は、プログラムの先頭で初期化され、以降制御がどのモジュールのどのプロシージャに移ってもプログラムの終了まで内容が保持されています。
一般にモジュールレベルの変数は保持期間が長いため、不必要に宣言すべきではないと言われています。つまり、プロシージャレベルで済むものはプロシージャレベルで宣言するべきということになります。
  • 「Public」で宣言する変数は、プロジェクト内の全ての場所から参照することができます。
    「Public」は「Global」と書いても同じです。(「Global」は古い書き方なので避けましょう)
  • 「Private」で宣言する変数は、このモジュール内の各プロシージャからは参照できますが、プロジェクト内の他のモジュールからは参照できません。
    「Private」は「Dim」と書いても同じです。
  • 「Const」での宣言は、定数の宣言です。定数名の右に「=」で内容を書き込みます。これは定数であり、処理中での内容の書き換えはできません。
    「Const」の前に「Public」、「Private」が明示できます。明示しない場合は「Private」と同じになります。
プロシージャレベルの変数
プロシージャ内部では、実際にその変数を使用する記述より上で変数を宣言しておく必要があります。一般にはプロシージャの先頭にまとめて記述します。モジュールレベルで宣言されている変数と同じ名前の変数がある場合はプロシージャ内の変数が参照されます。
  • 「Dim」で宣言する変数は、そのモジュール内のみが適用範囲(参照できる範囲)となります。「Dim」で宣言する変数は、そのプロシージャが呼び出される都度初期化されます。
  • 「Static」で宣言する変数も、そのモジュール内のみが適用範囲となりますが、「Dim」で宣言する変数と異なりプロシージャ内での処理が終了し、制御が他に移ってもその変数は初期化されません。次回そのプロシージャが呼び出された時に、以前の内容が保持されたままになります。
  • 「Const」での宣言は、定数の宣言です。定数名の右に「=」で内容を書き込みます。これは定数であり、処理中での内容の書き換えはできません。



★データの種類の個数を数える（Excel）
・COUNTIF(“範囲”,”条件”) ← “範囲”内で、”条件”を満たすセルの個数を返す
・1/COUNTIF（～） → １つの条件につきそのSUMは１ ← エクセル生活 : 重複しないデータを数える
・「=SUMPRODUCT(1/COUNTIF(範囲,範囲))」で”範囲”のSUMを計算すれば、”範囲”内におけるデータの個数が分かる
（・∀・）SUMIF SUMPRODUCT SUMIFで複数条件 エクセル Excel [エクセルの学校]
＜SUMPRODUCT関数は配列の積の和を計算します＞


★複数の条件を満たすもののカウント（Excel）
（条件＝True）のとき「1」、（条件=False）のとき「0」を返すので、
SUMPRODUCT((「範囲１」=「条件１」)*(「範囲２」=「条件２」)* …… )
とすればＯＫ。
（・∀・）Excel豆知識29-3:エクセル:SUMPRODUCT関数


★セルに名前をつけるSelection.Name = "名前１"Range("B1").Name = "名前１"




Filed under: ★Visual Basic　　タグ: , , , , , , , , , , , , 　　charlie432 00:00  Comments (0)
★゜・。。・゜゜・。。・゜☆ 2010年03月27日 ☆゜・。。・゜゜・。。・゜★

【VB】備忘録 3/23, 24

自分のための覚え書き(^^;


====== ３／２３ ======


★ユーザーからの入力を受け付ける
・ファイルを開く
Application.GetOpenFilename (“【ダイアログボックスのリストに表示される文字列】,【表示する拡張子を指定】[,【ダイアログボックスのリストに表示される文字列】,【表示する拡張子を指定】][,【ダイアログボックスのリストに表示される文字列】,【表示する拡張子を指定】]“)

（例）
Application.GetOpenFilename (“Excel ブック (*.xls), *.xls, テキストファイル(*.txt),*.txt”)


・ファイルを保存する
Application.GetSaveAsFilename (“【表示させるファイル名】”, “【ダイアログボックスのリストに表示される文字列】,【表示する拡張子を指定】[,【ダイアログボックスのリストに表示される文字列】,【表示する拡張子を指定】][,【ダイアログボックスのリストに表示される文字列】,【表示する拡張子を指定】]“)

（例）
Application.GetSaveAsFilename (“MyBook.xls”, “Excel ブック (*.xls), *.xls, テキストファイル(*.txt),*.txt”)


★配列
動的配列はサイズを決定しないまま要素にアクセスするとエラーになります。
Dim Names() As String

Names(0) = "後醍醐天皇" 'ここでNullReferenceExceptionが発生する。

動的配列のサイズを決定するにはRedimステートメント(読み方：Redim = リディム)を使用します。次の例はサイズを3に設定してから要素にアクセスするのでエラーになりません。Dim Names() As String

ReDim Names(2)

Names(0) = "後醍醐天皇"

↑
２行目をi = 2

ReDim Names(2)としてもＯＫ。

Redimを使用すると後から動的配列のサイズを変更することもできます。その時にPreserveキーワード(読み方：Preserve = プレサーブ)を指定しないと配列の内容はいったんすべてクリアされてしまいます。

そのため次のコードを実行すると空のメッセージボックスが表示されます。Dim Names() As String

ReDim Names(2) '配列の要素数を3に決定

Names(0) = "後醍醐天皇"

ReDim Names(3) '配列の要素数を4に変更

MsgBox(Names(0))

Preserveを使用すると配列の内容はクリアされません。次の例では「後醍醐天皇」と表示されます。Dim Names() As String

ReDim Names(2) '配列の要素数を3に決定

Names(0) = "後醍醐天皇"

ReDim Preserve Names(3) '配列の要素数を4に変更

MsgBox(Names(0))

Preserveはこのように便利に使用できますが、ループの中などで繰り返し使用すると体感できるほど処理が遅いです。



★最終行、最終列の位置を取得
最終行 = Cells(Cells.Rows.Count, 1).End(xlUp).Row
最終列 = Cells(1, Cells.Columns.Count).End(xlToLeft).Column

・エクセルの行数 = Cells.Rows.Count
・エクセルの列数 = Cells.Columns.Count
↑
エクセルのver が同じなら、ほぼ定数みたいなものですね。






====== ３／２４ ======


★ブックの開閉（復習）
・新規Workbooks.Add

・開くWorkbooks.Open FileName:="●●●.xls"

・閉じる（すべて）Workbooks.Close

・閉じる（単体）ActiveWorkbook.Close

・閉じる（ブック名指定）Workbooks("●●●.xls").Close

・閉じる（ｎ番目に開いたブック）Workbooks(n).Close

・保存して閉じるWorkbooks("●●●.xls").Close SaveChanges:=True

・保存せずに閉じるWorkbooks("●●●.xls").Close False


★ワークシート数取得（復習）
・アクティヴなブックActiveWorkbook.Worksheets.Count

・指定したブックWorkbooks("●●●.txt").Sheets.Count↑
エラーが出て未解決


★シートの挿入（復習）
・挿入Worksheets.Add

・挿入（位置、枚数指定）Worksheets.Add After:=Worksheets(n), Count:=m
Worksheets.Add Before:=Worksheets(n), Count:=m


★改行（復習＋追記）
キャリッジリターン＝chr(13)、ラインフィード＝chr(10)
chr(13) & chr(10) ←→ vbCrLf


★VLOOKUP・式の意味（Excel）
式 =VLOOKUP(B3, B6:C10, 2, FALSE) の意味
  • 最初の引数 B3 は
    • 検索値
    • 調べたいデータが入ったセルを指定します
  • 2番目の引数 B6:C10 は
    • 範囲
    • 探すべきテーブルの範囲を指定します
  • 3番目の引数 2 は
    • 列番号
    • 表の何列目を答えとして使うかを指定します
  • 4番目の引数 FALSE（フォールスと読む） は
    • 検索の型
      • 近似検索するとき：TRUE
      • 完全に一致するものを探すとき：FALSE
    • 原理的にはB列の品名の文字コードの昇順に並べてあればFALSEは省略可能ですが現実として単純な並べ替えでは文字コードの順に並んでくれない場合が多いです



★ワークシート関数をVBAで使用するにはWorksheetFunction プロパティを利用します。
【例】C1にSUM関数,C2にAVERAGE関数,C3にCOUNT関数での結果を返します。Sub rei13_4()
　　With Worksheets("Sheet1")
　　　　.Range("C1").Value = Application.WorksheetFunction.Sum(.Range("A1:B1"))
　　　　.Range("C2").Value = Application.WorksheetFunction.Average(.Range("A2:B2"))
　　　　.Range("C3").Value = Application.WorksheetFunction.Count(.Range("A3:B3"))
　　End With
End Sub



★開かれているブックの数を取得する'開かれているブックの数を取得する
Sub Sample1011()
　　MsgBox Workbooks.Count
End Sub↑
ということは、最新のブックをアクティヴにするにはWorkbooks(Workbooks.Count).Activate


★日付文字列またはシリアル値から日（月、年など）を表す数値を返す、、、など（Excel）
たとえば月を返す場合は=MONTH(A1)


★四捨五入など（Excel）
四捨五入(ROUND)切り上げ(ROUNDUP)切捨て(ROUNDDOWN)
倍数に四捨五入(MROUND)倍数に切り上げ(CEILING)倍数に切り下げ(FLOOR)
剰余を求める(MOD)偶数に切り上げ(EVEN)その数値を超えない最大の整数(INT)
奇数に切り上げ(ODD)小数部を切り捨てる(TRUNC)





Filed under: ★Visual Basic　　タグ: , , , , , , , , , , , , , 　　charlie432 00:00  Comments (0)
« 前ページへ — 次ページへ »
    2012年5月
    月 火 水 木 金 土 日
    « 4月    
     123456
    78910111213
    14151617181920
    21222324252627
    28293031  

    現在の閲覧者数
    サイト内検索

  • ふぉろーぼたん

  • ページランク

    ページランク

  • Twitter

  • Recent Trackbacks

  • カテゴリー

    open all | close all

Page 15 of 54« First...510...1314151617...2025303540...Last »