回答: 実行ファイル(exe)の作成された場所にDLLがないことが原因と考えられます。 ※作成される場所はプロジェクトのプロパティの出力パスの設定で変更可能なため、別の場所に保存されている場合もあります。設定をご確認ください。 その他問題: 'OrangeEasyAPI.dll'のファイルは上記のファイルは、ソースの開発環境下に存在します。 参照設定を行おうとしてファイルを選択すると「参照を追加できませんでした。ファイルがアクセス可能で、有効なアセンブリもしくはCOMコンポーネントであることを確認してください。」とのエラーとなります。 回答: ①メニューのビルド→構成マネージャを開く②構成マネージャのアクティブソリューションプラットフォームを「Any CPU」から「x86」に変更して閉じる ③デバッグ→デバッグ開始で起動できます。 理由は の二つにしかOrangeAPI.dllが入っていないので、Any CPUでコンパイルしてできるフォルダにOrangeAPI.dllをコピーして入れる必要があります。 みなさまだいぶお久しぶりです。 今日は他の人のVisualStudio2015で起こったエラーについて書いていきたいと思います。 プロジェクトファイルを読み込まないslnファイルを開いたはいいが、読み込みがうまくいかない問題。 終わります。
大変お世話になります。 エクセルでマクロに詳しいかた教えてください。 ユーザーフォームを使い 別のファイルにあるシートから検索結果をリスト表示したいのですがやり方が全く分かりません。ネットで条件検索すると下記のコードが出てきました。 Private Sub commandbutton1_click() Dim lastrow As Long Dim mydata, mydata2(), myno Dim i As Long, j As Long, cn As Long Dim mybook As Workbook Set mybook = Workbooks("部品リスト.xlsx") With mybook.Worksheets("sheet1") lastrow = .Cells(Rows.Count, 1).End(xlUp).Row mydata = .Range(.Cells(1, 1), .Cells(lastrow, 7)).Value End With ReDim mydata2(1 To lastrow, 1 To 3) For i = LBound(mydata) To UBound(mydata) If mydata(i, 2) Like "*" & TextBox1.Value & "*" And mydata(i, 7) Like "*" & TextBox2.Value & "*" Then cn = cn + 1 mydata2(cn, 1) = mydata(i, 1) mydata2(cn, 2) = mydata(i, 2) mydata2(cn, 3) = mydata(i, 7) End If Next i With ListBox1 .ColumnCount = 3 .ColumnWidths = "30;70;70" .List = mydata2 End With End Sub ただこのコードだとリストを立ち上げていないと読み込みません。 別の場所にあるファイルを読み込み専用で立ち上げて検索するにはどうしたらよいでしょうか? あとこの条件で出来上がったマクロを複数人で同時使用した場合同じリストを読み込みに行くので読み込めない不具合が起こったりするのでしょうか?エクセル初心者で申し訳ありません。宜しくお願いします。Excel |