すべての検索結果：26件
検索条件：タイトルと本文+更新順
EXCEL VBAのトピック
SQLite３のEUCエンコーディングのDBをExcel VBAで読み書きしたい
=*" & m_string2 & "*" Cells(i, j).Value = m_string2 SQLite３のEUCエンコーディングのDBをExcel VBAで読み書きしたい
- 2015年05月05日 16:05
- 4316人が参加中
- 13
EXCEL VBAのトピック
Oracle汎用検索ツール
").Cells(i + 2, 2).Value = 1 'FLG ON Else Worksheets("TBL").Cells Worksheets("COLUMN").Cells(i, 4).Value <> "" Then Worksheets
- 2014年05月17日 07:39
- 4316人が参加中
- 22
Excel（エクセル）活用のトピック
VBA セルの値の連結
記述方法がわからず困っています。ただ単にA1とB1を結合するならCells（3,1).Value=Cells(1,1).VAlue & Cells(1,2).Value VBA セルの値の連結
- 2013年09月05日 13:54
- 20951人が参加中
- 44
Excel（エクセル）活用のトピック
VBA くり返し処理で纏めれるでしょうか？
.TextBox22.Value = Cells(intRow, 15) & " " & Cells(intRow, 16).Value UserForm1.TextBox23.Value = Cells(intRow, 20) & Cells(intRow, 21) & Cells
- 2013年04月07日 21:21
- 20951人が参加中
- 14
Excel（エクセル）活用のトピック
VBA 複数のCheckBoxのオンオフの組み合わせについて
CheckBox4.Value = True And CheckBox5.Value = True Then Cells .Value = True And CheckBox5.Value = False Then Cells(intRow
- 2012年08月14日 15:06
- 20951人が参加中
- 8
Excel（エクセル）活用のトピック
VBA 構文をもっとシンプルにしたい。
月日年号判別 Cells(intRow, 99).Value = Ob End If Next Ob Then '性別判別 Cells(intRow, 100).Value = Ob - 3 End
- 2012年08月12日 22:44
- 20951人が参加中
- 15
Excel（エクセル）活用のトピック
コードがうまく動作していない？
") If 入力結果 = 6 Then For j = 1 To 15 Cells(j + 3, i + 1).Value 主食 = Cells(4, 17).Value Me.Controls("ComboBox" & CStr(m
- 2010年08月10日 10:46
- 20951人が参加中
- 3
EXCEL VBAのトピック
sumproduct について
Worksheets("支払いまとめ").Cells(i2 + 1, i).Value =_ Evaluate("SumProduct 会社の経費管理を自動化しようと思って、VBAに初挑戦しています。 ところが、SumProductにひ
- 2010年06月16日 13:30
- 4316人が参加中
- 8
Excel（エクセル）活用のトピック
VBA 並べ替えが上手くできない
Cells(最終行2 + 1, 12).Value = Me.Controls("ComboBox" & CStr(k + 6)).Value 副他 = Cells(6, 15).Value Me.Controls("ComboBox" & CStr
- 2010年04月30日 14:29
- 20951人が参加中
- 5
Excel（エクセル）活用のトピック
VBA 記述の簡素化
日のメニューを入力します", vbYesNo, "入力") If 入力結果 = 6 Then Cells(4, 2).Value = ComboBox1.Value Cells(5, 2).Value = ComboBox2.Value Cells(6, 2
- 2010年04月14日 14:06
- 20951人が参加中
- 3
EXCEL VBAのトピック
実行時エラー '50290':の対処法について
ーディングに問題がある？ 以下（VBAフォームモジュール）がエラー発生したプロシージャになります。 Private Sub ListBox1_Click を削除 If Range("X1").Value = 1 Then Call Del_Sheet
- 2009年12月15日 20:30
- 4316人が参加中
- 5
Excel（エクセル）活用のトピック
VBA記述 IF分岐で２回処理されてるのですが…
負の数の場合 Select Case Cells(.Row , 2 ).Value '分岐２ Ｂ列の値で判定 Case 0 ' B VBA記述 IF分岐で２回処理されてるのですが…
- 2009年06月27日 00:41
- 20951人が参加中
- 6
EXCEL VBAのトピック
セルをクリックすると現在の月に対応したセルの値が増えるように
Cells(cRow, cCol).Value = Cells(cRow, cCol).Value + 1 End If End Sub なのですが、当該セルをクリックしても反応しないのです。 ＶＢＡはまだまだいまいち理解できていないのですが、早急
- 2009年04月15日 01:30
- 4316人が参加中
- 9
Excel（エクセル）活用のトピック
VBA ユーザーフォームの初期値としてコンボボックスにカーソルを合わせたい
Cells(4, 2).Value = ComboBox1.Value Cells(5, 2).Value = ComboBox2 .Value Cells(6, 2).Value = ComboBox3.Value Cells(7, 2).Value
- 2008年11月22日 12:57
- 20951人が参加中
- 4
Excel（エクセル）活用のトピック
VBA IFを使ってシートのアクティヴを判別したい(？)
() Cells(2, 2).Value = TextBox1.Value Cells(4, 2).Value = TextBox2.Value Cells(4, 3).Value = TextBox3.Value Cells(5, 2).Value = TextBox4.Value
- 2008年10月10日 11:55
- 20951人が参加中
- 5
Excel（エクセル）活用のトピック
【ＶＢＡ】テキストボックスについて
、XPです。 以下は現在記述しているマクロ(一部)です↓ 〜データ入力マクロ〜 Cells(intRow, 1).Value = TextBox1.Value Cells(intRow, 2).Value = TextBox2.Value Cells(intRow, 4
- 2008年07月04日 17:30
- 20951人が参加中
- 7
Excel VBA 製作所のトピック
フォームからのデータ転記について
Cells(Rows.Count, 1).End(xlUp).Offset(1) .Value = TextBox1.Text .Offset(0, 1).Value = TextBox2.Text .Offset(0, 2).Value = TextBox3.Text
- 2008年05月21日 20:42
- 1505人が参加中
- 6
Excel（エクセル）活用のトピック
VBA コードの記述が上手くいきません。。
.RowSource = "基本データ!AP19:AP20" End With TextBox1.Value = Cells(2, 1 ).Value TextBox2.Value = Cells(2, 2).Value TextBox3.Value = Cells
- 2008年03月20日 21:32
- 20951人が参加中
- 11
EXCEL VBAのトピック
テキスト出力する際、改行させない方法が分かりません・・
no = Cells(5, gyou).Value 'セル指定は左：列、右：行 Print はじめまして仕事でＶＢＡを使用するために、つい最近勉強しはじめた者です。 私の仕事の場合「ｾﾙの値→ﾃｷｽﾄ出力」が主
- 2008年03月10日 01:41
- 4316人が参加中
- 4
エクセル大好きのトピック
☆シートは広い！★崖ってあるのですか？
, retu).Value = Worksheets("CVS-B").Cells(gyo, retu).Value Then .Cells(gyo ).Interior.ColorIndex = 3 .Cells(gyo, retu).Value = "不一致" End If Next retu retu
- 2007年12月21日 10:41
- 439人が参加中
- 12
EXCEL VBAのトピック
セルの値を配列に取り込み計算する方法をご教授ください．
<= Imax ReDim U(Imax -1) U(I) = Cells(I , 1).Value Loop 'I＝1 , 2), Cells(Imxa, 2)).Value = upc Loop
- 2006年06月10日 22:43
- 4316人が参加中
- 7
