Quantcast
Channel: OKWAVE 最新質問(Visual Basic/257)【本日】
Browsing all 6510 articles
Browse latest View live

vbaで正規表現

正規表現のコードなんですが、 上手く動きません。 何故でしょうか… Sub Test() Dim reg As Object Dim ans As Object Dim c As Range         Set reg = CreateObject("VBScript.RegExp")     For Each c In Range("A1", Range("A" &...

View Article


名前を付けてプロジェクトを保存

.NET2005です。既存のプロジェクトを「名前を付けて保存」はできないのでしょうか。お願いします。

View Article


関数の引数に括弧を使う理由

VBAを使っていて 関数fffに引数として配列aaaを入れたいとします。 通常 fff(aaa) と指定するところですが fff(aaa()) と括弧を付けて指定する場合もあるようです。 このように括弧を付けるのはどういう理由があったでしょうか?

View Article

vb2010にてASPWEBシステムを作成していま

す。 もともとローカルドライブにソースを置いて開発&デバッグしておりました。 今回、ソースをネットワークドライブに移動しました。 ソースの読み込みは、問題無くできるのですがデバックを行うと下記のメッセージエラーが発生します。 対処法を教えていただけないでしょうか?? セキュリティ例外 説明: このアプリケーションはセキュリティ...

View Article

Label2.visible=false

任意の関数式を入れるとグラフを描くプログラムを作りました。表示するのに時間がかかる(といっても1秒程度ですが)ので「計算中!」と赤で表示させ、グラフが描き終わると消したいと思い、グラフ開始時にLabel2.Visible=True、終了時にLabel2.Visible=Falseを付けましたが、思惑通りには行きません。何故でしょう。おわかりになる方、教えてください。

View Article


ExcelVBA バイナリファイルの全半角の判断

Excel VBAでテキストファイルを、バイナリファイルとして読込み シートに出力しようとしています。 しかしテキストファイルには全角半角が混ざっており、うまく出力できません。 Dim buf As Byte 上記の変数に読込んだバイナリデータ1バイト分を入れるとして、 これが半角文字なのか、全角文字の半分なのか、判断することはできるのでしょうか。

View Article

VB2010のDatabindingについて

現在VB2010ExpにてSQLサーバとのデータのやり取りをするプログラムを作成しています。 SQLサーバから読み込んだ内容をDataRepeaterで表示しています。...

View Article

VB.netでフォームのクローン

VB.net2013にて、フォームアプリ作成中です。 アプリの構成としては、 Aフォーム、Bフォームの2画面があり Aフォームの呼出ボタンにより、フォームを呼び出す仕組みです。 Bフォームでは、データ編集できる 下記のような入力コントロールが多数配置されています。 ・テキストボックス ・スプレッドシート ・ラジオボタン ・ユーザコントロール各種 等々 ※Aフォームには、編集状態を保持するために...

View Article


VBAでテキストボックスに値を入れたい

お世話になります。 エクセルのVBAで、WEBブラウザ内にあるテキストボックスに 文字を入れたいと思っております。 以下のようなページは処理できたのですが、 ・対象ページのブラウザのソースを見ると「textarea」のタグがあり、  それを取得して、「value」に文字を入れる 「スタイルシート」で書かれたページの処理の方法がわかりません。 お手数ですが、ご存じの方宜しくお願いします。

View Article


VB初心者です

エクセルVB初心者です。 ウェブサイトから情報を取ろうと思いました。 <dt class="market zsg-fineprint"> <!-- Market Text & tooltip --> <!-- Non-Market Text & Tooltip --> Market <sup>&reg;</sup>:...

View Article

ExcelのToggleButtonを排他的に。。

師も走りまわる12月。。皆様(師)も走りまわっていることでしょう。 私は。。。走りません、はい。 本題です。 ExcelのVBAでToggleButtonを排他的に使いたいのです。 調べるとオプションボタンになさいと書かれてはいるのですが・・・。 ワークシート上にToggleButton1~3があります。 1を押す(凹)と“処理A”,もう一度押す(凸)と“処理Z” 2  同上    “処理B”,...

View Article

VBAでWEBのリンクをクリックしたい

お世話になります。 VBAで添付画像の赤色枠の箇所を、自動でクリックしたいのですが、 実現できません。 ブラウザで「ソースを表示」しても「あいうえお」という値が入ったタグが 出てこないのです。 文字数が原因で全文載せることができないのですが、以下に「ソースを表示」で 記された内容を記載しますので、知識ある方教えて頂けないでしょうか? ★「ソースを表示」 <!DOCTYPE...

View Article

オートフィルター配列設定時の文字数制限について

EXCEL VBAで困っています。 約60000行の表があり、所定行に以下のようなデータが入力してあります。  A、B、D  A、C  C、H  D、E  F、G、H  ・・・・ これに対し、別リスト(B、D、H・・・)のどれかが含まれている項目を オートフィルターで抽出するマクロを作成しており、 各一致データをリストアップするところまで完成しております。...

View Article


テキストファイルを直接置換する方法

VBAに関する質問です。 複数のテキストファイルを読み込んで 指定した文字列を別の文字列に検索・置換してくれるプログラムを作りたいと考えています。 これをするためには一度 Set MyTxt = FSO.OpenTextFile(StrPath, 1) Do While MyTxt.AtEndOfStream = False hairetu(xxx) = MyTxt.ReadLine loop...

View Article

""の中身を取得する方法

VBAを使っています。 htmlファイルを読み込んで href="http://www.xxxx.html" の http://www.xxxx.html このURLの部分だけを順番に抽出し配列に保存するプログラムを書きたいのですが どのように書けば良いですか?

View Article


GDI+を使ったビット数とDPIの扱い

http://oshiete.goo.ne.jp/qa/8858627.html このページでVBAのGDI+を使った8bitや24bitの画像の取扱方にについて教えていただきました。 追加の質問なのですが 画像を読み込んで画像のビット数を調べるにはどうしたら良いですか? 8bitなのか24bitなのか? それと読み込んだ画像のdpiを取得する方法および...

View Article

エクセルのマクロについての質問です。

エクセルのマクロについての質問です。 複数のシートのデータを一つのシートにまとめるマクロを使用しています。 以下のものになります。 Sub まとめ() Dim i As Long, ii As Long ii = 1 With Worksheets .Add before:=.Item(1) For i = 2 To .Count .Item(i).Range("BX6:CQ15").Copy...

View Article


DataRepeater上のチェックボックス

VB2013にてデスクトップアプリを作成しています。 フォーム上にVBPowerPack12のDataRepeaterを配置し、その上にラベル、チェックボックスを配置しています。 チェックボックスを2個配置(フラグ1、フラグ2とします)した場合に変わった動作をしているため困っています。 データバインドし一覧表示させ、 1)1行目のフラグ1をクリック->1行目のフラグ2をクリック...

View Article

大量の標準モジュールを解放する方法

VBAを使っていて 大量の標準モジュールを解放したい場合 一つ一つ「解放」を実行していくのが面倒なのですが 自動で複数のモジュールを解放することはできないでしょうか? 何か良い方法があれば教えてください。

View Article

エクセルの名前定義で、配列は使用できないのでしょう

こんにちは。 エクセルでの名前定義ですが、通常、下記のように、セル番地を使用すると思いますが、 配列を使用することは出来ないのでしょうか? ActiveWorkbook.Names.Add Name:="test", RefersToLocal:="=Sheet1!$A$1:$B$2" 下記のようなマクロを作り実行しましたが、うまくいきませんでした。 Dim ABC(0 to 1) ABC(0) =...

View Article
Browsing all 6510 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>