エクセルの学校：全文検索：Hyper Estraier： IF

Results of 161 - 170 of about 37652 for IF (0.016 sec.)

[[20161128150724]] 1271: 『関数に（入り子）について』（MS）以下について 0なら"未入金"を表示し 0以上なら F6-G6 それ以外"" ... ますか? 初歩的ですみません。よろしくお願いします。 =IF(G6=0,"未入金",IF(G6>0,F6-G6,"")) ＜使用 Excel:Exc ... と判断される。面倒でもまず、""と比較してみてくれ。 =IF(G6="","",IF(G6=0,"未入金",IF(G6>0,F6-G6,""))) ある ... いは =IF(G6>0,F6-G6,IF(OR(G6="",G6<0),"","未入金")) か? （ね ... 8(月) 15:17 ---- （ねむねむ）さん速攻すみません。 IF(G6="","" この条件も入れなくてはだめなんですねあり ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201611/20161128150724.txt - [detail] - similar

[[20140908144924]] 1271: 『ユーザーフォームモードレスでフォーカスを戻す』（あすな）
ユーザーフォームをモードレスで開き、必 ... xtBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Len(TextBox1.Value) = 0 Then MsgBox "納品希望日を入 ... 力してください" Cancel = True End If End Sub としました。ですが、フォーカス?カーソル?が ... xtBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If Len(TextBox1.Value) = 0 Then MsgBox "納品希望日を入 ... 力してください" SendKeys "+{tab}" End If End Sub （???） 2014/09/08(月) 15:56 ---- ???さん回 ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201409/20140908144924.txt - [detail] - similar

[[20070122064354]] 1271: 『分類と並び替え』（BOXY）
過去ログを調べましたが、似たようなものがありましたがアレンジ方法がよ ... Header:=xlYes For Each c In .Range("A5:A" & lRow) If c.Offset(0, 2).Value = 2 Then c.Font.ColorIndex = ... 3 End If Next c .Range("D:D").Clear .Range("1:3").Delete En ... 文字色を赤に設定 For Each c In .Range("A5:A" & lRow) If c.Offset(0, 3).Value = 2 Then c.Font.ColorIndex = ... 3 End If Next c '---E列をクリア、1〜3行目を削除 .Range("E:E ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200701/20070122064354.txt - [detail] - similar

[[20040820102513]] 1271: 『IF関数を利用して』（0820）
IF関数を利用して、ある数値が 50円〜100円の間なら Aを 101円〜150円の ... Bを表示する関数はどうしたらよいのでしょうか? ---- =IF(AND(A1>=50,A1<=100),"A",IF(AND(A1>=101,A1<=150),"B ... ---- 早速ありがとうございます。それで、なのですがIF（・・・・）このカッコの中で使用できる例えば『IF』等 ... 50 A 3 101 B としてSheet1のA1に数値を入れるとして =IF(A1="","",VLOOKUP(A1,Sheet2!A1:B3,2)) などです。（ ... ケン） ---- =IF( A1<=4, if( A1<=2, IF(A1<=1, if(A1<=0.5,1,2), if(A ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200408/20040820102513.txt - [detail] - similar

[[20200426185317]] 1271: 『数独・ナンプレの解答をランダムで作りたい』（asa）
数独・ナンプレ(9×9)の解答をランダムに作成した ... Dim s As Variant Dim shft As Double Dim a As Long If r >= P31 Then a = r - P32 Else a = r a = a Xor Int ... (r * M30) If a < 0 Then r = a + P32 Else r = a s = 1812433253 * ... CDec(r) + i: r = s - CDec(Int(s * M32)) * P32 If r >= P31 Then Ri = r - P31 Else Ri = r End Functio ... As Long) Dim r As Double mt(0) = s And &H7FFFFFFF If s < 0 Then r = P32 + s Else r = s For mti = 1 To M ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/202004/20200426185317.txt - [detail] - similar

[[20130429110314]] 1271: 『IF関数ネストで結果がうまく出ない』（プーダン）
Excel2002,Windows 7 バレーでの勝点を出す計算式で ... et数 E2 Bチーム計算結果 F2 Cチーム計算結果 Bチーム=IF(A2>D2,10,IF(B1+B2=C1+C2,5,IF(B1+B2=C1+C2,8,2))) Cチ ... ーム=IF(A2<D2,10,IF(B1+B2=C1+C2,5,IF(B1+B2<C1+C2,8,2))) こ ... す。 ---- 実際はこんな感じになるのでしょうね Bチーム=IF(A2>D2,10,IF(A2<D2,0,IF(B1+B2=C1+C2,5,IF(B1+B2=C1+C ... 2,8,2)))) Cチーム=IF(A2<D2,10,IF(A2>D2,0,IF(B1+B2=C1+C2,5,IF(B1+B2<C1+C ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201304/20130429110314.txt - [detail] - similar

[[20200922011420]] 1271: 『利用期限制限について』（GS）
質問よろしくお願いします。現在、同一book内に以下マクロにて利用制 ... en() Dim MyD As Date MyD = #4/30/2021 12:00:00 AM# If Now() >= MyD Then MsgBox "利用期限が過ぎました" & ... クは使用できません", 48 ThisWorkbook.Close False End If End Sub ＜使用 Excel:Excel2019、使用 OS:Windows10 ... lls(1, 1).Value .Close SaveChanges:=False End With If Date >= Date Then MsgBox "利用期限は" & myD & "です ... False Else MsgBox "利用期限は" & myD & "です" End If End Sub 自分でWebサーバー立てられるなら、Web上で期 ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/202009/20200922011420.txt - [detail] - similar

[[20161108151135]] 1271: 『VBAでガントチャートの作り方』（OPA）
現在VBAでガントチャートを作ろうと思ってるんですがわかりま ... cw = InputBox("便名を入力", "入力", "エクセル便") If cw <> "" Then Application.EnableEvents = False Wit ... Application.EnableEvents = True Cancel = True End If End Sub （???） 2016/11/08(火) 16:48 ---- β様お返 ... al Target As Range, Cancel As Boolean) With Target If .MergeCells = True Then If MsgBox("スケジュール削除 ... ts .Value = "" Application.EnableEvents = True End If End If End With End Sub （???） 2016/11/08(火) 17: ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201611/20161108151135.txt - [detail] - similar

[[20160830114249]] 1267: 『UserForm2で検索してリストボックスに表示、UserForm1に表示させて修正・変更登録』（もか）
はじめま ... Data2(), myno Dim i As Long, j As Long, cn As Long If TextBox1.Value = "" And TextBox2.Value = "" Then E ... 1 To 13) For i = LBound(myData) To UBound(myData) If myData(i, 3) Like "*" & TextBox1.Value & "*" And m ... myData(i, 12) myData2(cn, 13) = myData(i, 13) End If Next i '検索で一致したデータをリストボックスに表示 ... よろしいですか?" Application.ScreenUpdating = False If TextBox1.Text = "" Then MsgBox "日付を、" & vbCrLf ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201608/20160830114249.txt - [detail] - similar

[[20190929192243]] 1267: 『シフト作成、1 コードの添削宜しくお願い致します。』（なのれい）
いつもお世話になっております。 ... = 末日 - 最終公休日 Cells(i, 6).Value = 月末連勤数 If Cells(i, 7) = "B" Then Cells(i, 8).Value = "出" En ... d If If Cells(i, 6) <= "2" Then Cells(i, 8).Value = "出 ... " If Cells(i, 6) <= "1" Then Cells(i, 9).Value = "出" I ... ls(i, 6) <= "0" Then Cells(i, 10).Value = "出" End If End If End If Next i If Range("D4").Value < 12 The ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201909/20190929192243.txt - [detail] - similar

訪問者：カウンタ