Results of 71 - 80 of about 37649 for IF (0.012 sec.)
- [[20170803094726]] 1336
- 『エクセルでのGrep検索』(お願いします)
VBA初心者です。 コードを書き換えて下記の機能を持つように ...
k.Worksheets(Worksheets.Count) '出力シート名前変更 If clsDirInfo(iDir).outputSheetName <> "" Then search ...
oOutSh.name = clsDirInfo(iDir).outputSheetName End If '名前の定義 If clsDirInfo(iDir).name <> "" And cls ...
o(iDir).nameCols).name = clsDirInfo(iDir).name End If '出力位置 nowResRow = searchOption.oOutSh.Range(st ...
リパス名を取得する For Each dir In topDir.SubFolders If dir.Attributes <> Alias Then Call doListGrep(dir.p ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201708/20170803094726.txt
- [detail]
- similar
- [[20130828173208]] 1336
- 『ユーザー定義型関数の速度を上げる方法について』(BB)
Windows Vista、Excel2003です。 エクセル上 ...
Dim c As Range HitData = a hit = 0 For Each c In b If Len(c.Text) = 0 Then If c.Interior.ColorIndex = 36 ...
Then For i = -1 To -1000 Step -1 If Len(c.Offset(0, i)) > 0 Then Exit For End If Next ...
If HitData = c.Offset(0, i).Text Then If c.Row > 37 And c.Row < 106 Then hit = hit + 2 Else ...
hit = hit + 1 End If End If End If Else If HitData = c.Text Then If c.R ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201308/20130828173208.txt
- [detail]
- similar
- [[20090619072025]] 1336
- 『改題2 Sheet1の氏名、生年、没年 等身関係等をSheet2の年軸表に記載』(はんにゃ)
今シートBに デー ...
バーに 1940/12/22 の様に表示された状態。) E2セルに =IF(A2="","",YEAR(IF(D2="母",SUMIF($D$1:$D$10,"父",$B$ ...
1:$B$10),B2))) F2セルに =IF(A2="","",E2&D2) J2セルに =IF(K2="","","△") K2セルに ...
=IF(ISNA(MATCH($Q2&"父",$F$1:$F$10,0)),"",INDEX($A$1:$ ...
A$10,MATCH($Q2&"父",$F$1:$F$10,0))) L2セルに =IF(AND(K2<>"",M2<>""),"====",IF(COUNTIF($L$1:L1,"==== ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200906/20090619072025.txt
- [detail]
- similar
- [[20230901145126]] 1336
- 『マクロでセルの値変換』(メガネ)
下記のような表で同一列にAが3個ある場合、上から2番目のAをCに変 ...
ns.Count For c = 1 To ec f = False For r = 1 To er If v(r, c) = "A" Then Select Case f Case True: v(r, c ...
"C": Exit For Case False: f = True End Select End If Next r Next c rng.Value = v End Sub シート名はダブ ...
or Each c In [A2:C12].Columns For Each r In c.Rows If r.Value = "A" Then i = i + 1 If i = 3 Then Exit Fo ...
r If a Is Nothing Then If i = 2 Then Set a = r Next If ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/202309/20230901145126.txt
- [detail]
- similar
- [[20220326220617]] 1336
- 『vba リストボックス内のリストをエンターキーで移動させる』(jjj)
はじめまして。 リストボックス内 ...
wn(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) With Me.ListBox1 If KeyCode = vbKeyRe ...
Or KeyCode = vbKeyTab Then 'EnterキーまたはTabキー If .ListIndex = -1 Then .ListIndex = 0 ElseIf .ListCo ...
ListIndex = 0 Else .ListIndex = .ListIndex + 1 End If KeyCode = 0 ElseIf KeyCode = vbKeySpace Then 'Spac ...
eキー If .ListIndex <> -1 Then 'セルに転記 Worksheets("Shee ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/202203/20220326220617.txt
- [detail]
- similar
- [[20070620215119]] 1332
- 『ネストの限界について』(みにら)
先ほど(20070620160227)でも聞かせて頂いたんですが ネストの限界 ...
が来た時にどのように変化させると良いのでしょうか? =IF(IF(G8="","",OR(G8="",J9=$H$313,L9=$H$313,N9=$H$313 ...
N9=$H$314,P9=$H$314,R9=$H$314,T9=$H$314,V9=$H$314),IF(U8="",IF(S8="",IF(Q8="",IF(O8="",IF(M8="",IF(K8="" ...
,IF(I8="","",H10),K8-G8+1),M8-G8+1),O8-G8+1),Q8-G8+1), ...
ネストの限界かもしれませんが・・・出だしにいきなりIFが二つ重なっていますがこれでも大丈夫です ですかね?わ ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200706/20070620215119.txt
- [detail]
- similar
- [[20070914215234]] 1332
- 『任意の範囲の数字の抽出』(糸瀬)
A B C D E F G 1 22 47 16 41 10 35 4 2 5 23 48 17 42 11 29 3 3 ...
).Value & " です" test3 Range("L" & i).Value test4 If Range("P1").Value = "○" Or Range("P2").Value = "○" ...
").Value = "○" Then MsgBox "ビンゴ!!" Exit Sub End If Next i End Sub Sub test3(c As Integer) Dim e For E ...
ach e In Range("A1:G7") If c = e.Value Then e.Interior.ColorIndex = 6 e.Font. ...
("N" & e.Row).Value = Range("N" & e.Row).Value + 1 If e.Column = e.Row Then Range("O1").Value = Range("O ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200709/20070914215234.txt
- [detail]
- similar
- [[20061222213534]] 1332
- 『ユーザーフォームについて』(れいまま)
こんばんは。 またまた教えてください<(__*)>(また れいま ...
ge("A:A").Find(TextBox6.Text, , xlValues, xlWhole) If Not FR Is Nothing Then TextBox7.Text = FR.EntireRo ...
w.Cells(1, "B").Text Set FR = Nothing End If Range("G2").Value = TextBox7.Text End With End Sub ...
ge("A:A").Find(TextBox8.Text, , xlValues, xlWhole) If Not FR Is Nothing Then TextBox9.Text = FR.EntireRo ...
w.Cells(1, "D").Text Set FR = Nothing End If Range("H2").Value = TextBox8.Text Range("I2").Valu ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200612/20061222213534.txt
- [detail]
- similar
- [[20090303194225]] 1332
- 『関数とマクロ』(まんまる)
仕事でデータの差異を確認しています。 例えばですが1月の売上ファイルに ...
日の売上にaとbという組み合わせがあるか調べるのに 今はIF関数を使ってシートごとにいれています。 ファイルもシー ...
せんし どの様になさりたいのかも わかりません。 >今はIF関数を使ってシートごとにいれています。 それで良いなら ...
ているのはまずフィルタでaaという種類を抽出してその後 IF(1月の部品&個数=2月の部品&個数、”OK")といった感じの ...
を参考にしていいか分からない状態なのです。 今は入れたIF関数の結果がfalseを見てその組み合わせがあるかないかい ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200903/20090303194225.txt
- [detail]
- similar
- [[20110414095126]] 1327
- 『数式が多すぎてエラーになるのですが・・・』(とも)
はじめまして、宜しくお願いします。 =IF(L12= ...
D12,E12,IF(L12=D13,E13,IF(L12=D14,E14, IF(L12=D15,E15,IF(L12= ...
D16,E16,IF(L12=D17,E17, IF(L12=D18,E18,IF(L12=D19,E19,IF(L12= ...
D20,E20, IF(L12=D21,E21,IF(L12=D22,E22,IF(L12=D23,E23, IF(L12= ...
D24,E24,IF(L12=D25,E25,IF(L12=D26,E26, IF(L12=D27,E27,IF(L12= ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201104/20110414095126.txt
- [detail]
- similar
Powered by
Hyper Estraier 1.4.13, with 97030 documents and 608002 words.
訪問者: