未分類 未分類 
ExcelVBA 重複配列の取得と、各配列ごとの平均値取得（動的配列、UBound、Dictionary 使用）
'重複品番のうち、価格が同じはOKと判断する。'配列に重複品番を格納Dim Dic As Object, buf As StringDim Arr() As String: ReDim Arr(0) 'Index 0で初期化Dim sum下...
SQLサーバー SQL Server にTCP/IP接続する方法
SQL Server 構成マネージャ を起動します。 ※注意：SQL Server 構成マネージャーは Microsoft 管理コンソール プログラムのスナップインであり、スタンドアロン プログラムではないため、新しいバージョンの Wind...
AccessVBA開発 SQLの論理値は3（3値論理）
通常のプログラミング言語の論理値：True,False SQLの論理値 ：True,False,Unknown●SQLは第三の値Unknownを持つ●NULLについては、2種類ある ①未知（Unknown） ⇒値でも変数...
AccessVBA開発 既に開いているフォーム（フォーム1）に対し、フォーム2から値を渡す（住所入力補助フォーム）
フォーム1＞'メンバ変数Private mRetnValue As String'プロパティPublic Property Let RetnValue(ByVal Value As String) mRetnValue = ValueEnd...
AccessVBA開発 デザインビューではコントロールが表示されるのに フォームビューで表示されない
表示されるレコードがなく、追加もできない(=新規レコードの枠が表示されない)状態の場合、フォームビューの詳細領域にあるコントロールは、全て表示されなくなります。これはAccessがそういう仕様になっているようなのでどうしようもないのですが、...
インフラ USBプリンタサーバー 設定
①IPアドレスの設定 ・ ネットワーク上のIPアドレスを確認する IP アドレスの存在検出について ping 192.168.1.1 arp -a ネットワーク上のすべての IP アドレスを検出する for /L %i in (1,1,2...
AccessVBA開発 ODBC経由で接続したときのエラー対応
インサートするテーブルとSQLサーバー上のテーブルでテーブル規約に相違がないか調べる。例えば、主キーありの規約があるテーブルに対し、複数の値を更新しようとしていないかなど。。。
AccessVBA開発 重複行のレコードに連番を振る
'同じ製品番号が存在する場合は、行番号のフィールドに連番を振る。（重複なしは"1"とする）strSQL = "SELECT 製品コード, 行番号 FROM W_製品添加物 ORDER BY 製品コード" '製品コードでソートするSet rs...
AccessVBA開発 （エラー：3342）サブクエリ ‘<サブクエリ名>‘ のメモ型または OLE オブジェクト型のデータが正しくありません。
サブクエリはメモ型 (Memo) または OLE オブジェクト型 (OLE Object) のデータを返せないため、式の中でメモ型 (Memo) または OLE オブジェクト型 (OLE Object) のデータと比較することはできません。...