Results of 181 - 190 of about 37671 for IF (0.017 sec.)
- [[20151204195540]] 1267
- 『InputBoxのキャンセルについての続き』(sada)
[[20151201082551]]にて半平太さんに面倒を見て頂き ...
Application.InputBox(msg, "印刷部数", 1, Type:=1) If VarType(vntCop) = vbBoolean Then Exit Sub End If I ...
確認後、OKなら印刷をクリックして下さい" Exit Do End If Loop If .PageSetup.PaperSize = xlPaperA3 Then msg ...
tion.InputBox(msg, "ページサイズ設定", 2, Type:=1) If VarType(vntNum) = vbBoolean Then vntNum = 0: Exit ...
Do ' ※ If vntNum = 1 Or vntNum = 2 Then vntNum = vntNum + 7 ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201512/20151204195540.txt
- [detail]
- similar
- [[20080218235117]] 1261
- 『3個の条件式』(123456)
住所から市、郡、区までをとりだしたいのですが、二つの選択はできるのです ...
うにして、区を取り出すときは手作業で変更しています =IF(ISERR(MID(D6748,1,(SEARCH("市",D6748,1)))),MID(D67 ...
がでしょう。 回答ではありませんが、ご提示の式の場合 =IF(ISERROR(FIND"市",D6741)),LEFT(D6741,FIND("郡",D674 ...
へコピペ 3列選択したうえ =splt3(a1) と書き込みCtrl+Shift+Enterで確定します。 データ分だけフィルダウン。 ( ...
Function splt3(adrs As String) Dim x(3) As String If adrs = "" Then adrs1 = "": Exit Function work (adr ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200802/20080218235117.txt
- [detail]
- similar
- [[20170911143127]] 1261
- 『タイムカード』(まる)
タイムカードから勤務状態を計算する表の作成をしています。 A:日付、C:曜日 ...
退社から「まるめて」自動計算されるようにしました。 =IF(OR(H11="",J11=""),"",CEILING(H11,TIME(0,$AR$2,0))) ...
=IF(OR(H11="",J11=""),"",FLOOR(J11,TIME(0,$AR$3,0))) 1 ...
るようにしたいのですが、うまくできませんでした。 P11=IF(E11="","",COUNTIF(E11,"出勤")*IF(L11<=$AI$2,IF(N11 ...
<=$AI$2,0,IF(N11<=$AK$2,N11-$AI$2-$AI$6,$AK$2-$AI$2-$AI$6)),IF( ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201709/20170911143127.txt
- [detail]
- similar
- [[20130527202751]] 1261
- 『再び追加でおねがいします』(ちぃさん)
度々同じことですみません。 [[20130524235349]] での追加質 ...
---- 参考コードを3種類。 Sub Test1() Dim i As Long If ActiveSheet.AutoFilterMode Then For i = 1 To Activ ...
eSheet.AutoFilter.Filters.Count If ActiveSheet.AutoFilter.Filters(i).On Then ActiveSh ...
eet.AutoFilter.Range.AutoFilter Field:=i End If Next End If End Sub Sub Test2() ActiveSheet.Protec ...
。双方で使うなら、少し異なるコードにする必要がある。 If ActiveSheet.FilterMode Then を If ActiveSheet.Auto ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201305/20130527202751.txt
- [detail]
- similar
- [[20180316141204]] 1261
- 『IF関数 空白を』(はなれお)
A1セルに点数を入れ、B1に結果を返したいのです。その判断が下記になる ...
のですが、 IF(A1=40,"正常",IF(A1>=32,"軽度麻痺",IF(A1>=24,"中等度 ...
",IF(A1>=16,"やや高度",IF(A1>=14,"高度",IF(A1<=6,"完全" ...
< 使用 Excel:Excel2003、使用 OS:Windows7 > ---- =IF(A1=40,"正常",IF(A1>=32,"軽度麻痺",IF(A1>=24,"中等度 ...
",IF(A1>=16,"やや高度",IF(A1>=14,"高度",IF(A1="","",IF( ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201803/20180316141204.txt
- [detail]
- similar
- [[20040906165001]] 1261
- 『Fセルより左の列で一番Fセルに近い6桁のセル』(りん)
[例えば,Fセル-(Fセルより左側の列の中で一番 ...
場合でも「エラー」と表示させて良いのであればGセルに =IF(OR(MAX(A5:D5)<100000,MAX(A5:D5)>1000000),"エラー", ...
ます。 (考察であって、完璧な解答ではありません。) =IF(SUM(N(LEN(A1:E1)=6)),F1-INDEX(A1:E1,MATCH(MIN(IF(L ...
ナシ") と数式バーへ入力し、Enterではなくて、 Ctrl+Shift+Enterで数式を確定します。 {}で囲まれた配列式になり ...
合っていると思います。何例かではOKでしたから・・・ {=IF(F1="","",IF(SUM(N(LEN(A1:E1)=6)),MIN(IF(MIN(IF(A1: ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200409/20040906165001.txt
- [detail]
- similar
- [[20230527191732]] 1261
- 『Excelでタスク管理を作成しています』(白ご飯)
Excelでタスク管理を作成しています。 アプリで色々 ...
Worksheets("メニュー") Set r = ws1.Range("C6:C12") If Application.CountBlank(r) > 0 Then MsgBox "未入力セ ...
ルがあるので、入力すること" Exit Sub End If For Each wsName In Array("1ヵ月") Set ws2 = Worksh ...
条件をチェックし、メールを送信 For i = 8 To LastRow If Cells(i, "E").Value <> "" And Cells(i, "F").Value ...
" .Body = "本文" ' メールを送信 .Send End With End If Next i ' メモリを解放 Set OutlookMail = Nothing Se ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/202305/20230527191732.txt
- [detail]
- similar
- [[20140211175927]] 1261
- 『エクセルでゲームを作りたいのです。』(初心者)
D E F G H I J 4 ●●● 5 ●●● 6 ●●●●●●● 7 ●●● ●●● 8 ...
bleClick(ByVal Target As Range, Cancel As Boolean) If Target.Address = "$G$7" Then If MsgBox("ゲームをリ ...
xlThin Range("G7").Interior.ColorIndex = C_OFF End If End Sub Private Sub Worksheet_SelectionChange(ByVa ...
l Target As Range) If Target.Columns.Count = 1 And Target.Rows.Count = 1 ...
Then Exit Sub End If If Target.Columns.Count > 1 And Target.Rows.Count ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/201402/20140211175927.txt
- [detail]
- similar
- [[20090824084206]] 1261
- 『指定行内での指定内容の検索 系譜図上』(はんにゃ)
今 Sheets("系譜図")のxrbセル行番号の行内で 配 ...
で エラーがでます。 また 複数該当セルがあったときは If MsgBox("the same ? " & Cells(xrb,xcb) & "with" & t ...
bl1(irg, 1), vbYesNo) = vbYes Then Elseif '同じ質問 Endif と手動の確認する予定です なお、 Di ...
ing ret = InputBox("検索文字列を入力して下さい。") If Len(ret) = 0 Then MsgBox "キャンセルされました" Ex ...
it Sub End If With Sheets("データ表").Columns("A") 'Sheets("デー ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200908/20090824084206.txt
- [detail]
- similar
- [[20201021161501]] 1261
- 『関数の複数条件について』(こういち)
ご教授お願いします。 以下の数式に A12=1 の場合B1をそのまま ...
記入という関数 IF(A12=1,B1 A12に空白だったら以下数式を利用する関数を ...
組込可能でしょうか? =IF(A10=1,LEFT(B1,5)&"-00",IF(A10=2,"追加",IF(A10=3,"増 ...
減",IF(A10=4,"変更","")))) よろしくお願いします。 < 使用 ...
:Windows10 > ---- そのまま足して書けばいいのでは =IF(A12=1,B1,IF(A10=1,LEFT(B1,5)&"-00",IF(A10=2,"追加" ...
-
http://www.excel.studio-kazu.jp/wiki/kazuwiki/202010/20201021161501.txt
- [detail]
- similar
Powered by
Hyper Estraier 1.4.13, with 97019 documents and 608145 words.
訪問者: