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

エクセルVBAでIE操作

初心者です。例、エクセルからIEを呼び出してヤフーの全国お天気情報をsheets("sheet1").Range("A3")から順次張り付けていく構文をどなたかご教示お願いします

View Article


VBA Hex関数

Hex関数を使用して、16進から10進の処理をしようとしてますが 下記※のところで「型が一致しません」と出てしまいます。 色々変数の型を変えても、2つの※のどちらかで出てしまいます。 Dim r As Long Dim H2D As Long Dim CheckSum_Cal As Long For r = 1 To 10  H2D = Hex(Cells(5, r)) ※ CheckSum_Cal...

View Article


VBA 範囲選択時エラー

Private Sub Worksheet_SelectionChangeのVBAでA列B列C列でワンクリックで文字が入力できるように設定致しました。 その後、A列からC列を範囲選択してDeleteするとデバック 「実行時エラー  型が一致しません」と出てしまいます。業務上、そのセルのデータは一気に消したいので困っております。どなたか分かる方よろしくお願い致します。 Private Sub...

View Article

前月の最終セルの値を次月のE3とG3セルに入れる

よろしくお願いします。 下記の構文で実施したのですが、次月に繰越できません。 ご教示をお願いします。 Dim U As Long Worksheets("1月").Range("E3,G3").Value = 入力フォーム.繰越.Value For U = 2 To 12 Worksheets(U & "月").Range("E3,G3").Value = Worksheets(U - 1...

View Article

【ACCESS】 VBA

accessのVBAからエクセルファイルを参照する仕組みを作成しています。 エクセルファイルのシート名は数字になっており 下記のように記述するとエラーとなります。対応方法を教えてください。 STR_sheetは1 Set Xls_sheet = Xls_book.Worksheets(STR_sheet) こうしてみてもダメ Set Xls_sheet =...

View Article


EXCEL VBA 16進から2進に変換

EXCEL VBAにて16進数から2進数に変換したいと思い、 下記を実行したところ使用したところ、A1セルに入っている値が "AA"といったように2桁なら上手くいくんですが "AAA"というようにそれ以上の桁数になると、Hex2Binのプロパティが 取得できませんというエラーが出てしまいます。 Dim bin_1 As String bin_1 =...

View Article

UBound の使い方

Split で文字列を分離したものがt(0),t(1),・・・・と表されますが、 最後の項をt(n)とした場合、 For~文で最後を指定するとき、UBound(t) を使うと思いますが、最後から2番目、つまりt(n-1)までを指定するときはどう表せばよいでしょうか。

View Article

Excel VBAでCOMポートを調べる

表題の通り、Excel VBAでteratermと連携するツールを作っていますが 実行した際に、PCで使用されているCOMポートをダイアログ内に ラジオボタンで表示させて、使用するポートを選択させるという風に したいと考えています。 調べてると何となく難しそうですが、VBAでは限界でしょうか?

View Article


EXCEL VBA 今期実績を前年実績にコピー

お世話になります。 実績.xlsxというブックがあります。 この中の[東京支店]というシートから右へ全シート分繰り返したい下記の処理があります。これをどこかのシートに[処理]というボタンを作って、これをクリックしたら処理が走るVBAで実現できませんでしょうか? [やりたい処理] [東京支店]シートから右へ全シート下記の処理を実行...

View Article


VBA

ACCESSのVBAにて エクセルシートをコピーしたところ、 元ファイルで別シートの値を参照している設定が おかしなリンクになってしまいました。 解決方法はありますか? Aブックに1~10のエクセルシートがあり「2」シートをBブックにコピー Aブックの「2」シートでは、Aブックの「1」シートの値を参照していた Bブックの「2」シートのリンクが、コピー元のリンクになっている。

View Article

VBAでB列に並んでいる値を別シートにある同じ値が

VBAでB列に並んでいる値を別シートにある同じ値がある場合に処理を開始するというマクロを作成したいのです。 VBAは5年前にサンプルを改変して構築していた程度で 久々にVBAを開きました。 コード等載せることが出来れば良いのですが 現場の関係で載せられずすいません。 よろしくお願いします。

View Article

エクセルのvba(最終行を取得する並び替え)

初めまして、エクセルのvbaについて質問をさせてください。 マクロの記録を使って、以下の通りF列→M列→J列の順に優先して、A列からAL列を昇順に並び替えるvbaを作成したのですが、10000行までとう不恰好な書き方になっています。最終行までという書き方に変えたいのですが、色々試したもののうまくいきません…!この場合、最終行を取得するにはどのような書き方にすれば良いのでしょうか…??(T-T)...

View Article

Outlook VBA 電子メールアドレス取得方法

※長文失礼します。 ■質問内容 Windows7 Outlook2013の環境にて、宛先、CC、BCCを電子メールアドレス(sample@okwave.jp)で取得する方法が分かりません。(メッセージ送信検知→ユーザーフォームへ電子メールアドレスを出力させる予定) ■経緯 メール送信前に内容をするためのツールを作成しています。...

View Article


クリスタルレポート Barcode2of5関数

以下の開発環境でITFバーコード付きの帳票を出力したいと考えています。 Visualbasic2013 クリスタルレポート クリスタルレポートの関数で「Barcode2of5」を利用したいと考えているのですが、 引数が分らず利用方法が分らない状況です。 お手数ですが、利用方法が分る方がいらっしゃいましたらご教授頂けますと幸いです。

View Article

クリスタルレポートでチェックデジット計算

VisualBasic2013 と クリスタルレポートでバーコード付きの帳票を発行する アプリケーションを構築しようと考えております。 バーコードについては専用のフォントを利用する事と致しました。 バーコードの印字は実現できたのですが、チェックデジットの計算を どのタイミングで行うのが基本であるのか判断できずにいます。...

View Article


エクセル マクロ 特定の背景色を別の背景色に変える

エクセル マクロ・VBA初心者です。 該当のシートにおいて特定の背景色をすべて別の背景色に変えるには、 どのようにすればよろしいでしょうか。 ご教示お願いします。

View Article

エクスプローラとDIRコマンド表示順を同じにしたい

エクセルVBAで、特定のフォルダ内の子フォルダと子ファイルの名前を 取得して一覧にしました。数は1000ほどあります。 WIN7のエクスプローラで見える並び順で、 名前を取得しいのですが(そうでないと1000もあるので探せません)、 下記の見解があるようです。すると、これは実現不可能の問題でしょうか。 実現不可能であれば、ファイル名を記号、半角数字全額数字は区別しないと、...

View Article


エクセルマクロの構文の実行の仕方について

これからエクセルのマクロを学習しようとしている者です。教本等購入して一度目を通しただけの状態ですが、読んでいく中でいろいろ疑問が出てきました。例えばネット上には様々な構文が公開されていますが、実際にこれを活用しようと思ったときにエディターにコピペしてファイル名とブック名とシート名を個別に変更してやる、という作業だけで『シートを一つのブックにまとめて集計する』ということが可能になるんでしょうか?また実...

View Article

excelを使用したVBAの問題に関する質問です。

excelを使用したVBAの問題に関する質問です。 下記のサイトの問題19の解答の中で、 http://excel-ubara.com/excel-answer/EXCELVBA619A.html '縦合計の客単価 If i = 4 Then Cells(20, j) = Cells(18, j) / Cells(19, j) End If...

View Article

アウトルックのマクロ 件名を変更して転送したい

アウトルック2010で 件名を変更して転送するマクロをしたいのですがどうかけばよいでしょうか  あるサイトのマクロで Option Explicit ' ここをトリプルクリックでマクロ全体を選択できます。 Public Sub ForwardWithPrefix(objMail As MailItem) Const FORWARD_ADDRESS = "" ' 転送先のアドレスを指定します...

View Article
Browsing all 6510 articles
Browse latest View live


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