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

Results of 51 - 60 of about 37649 for IF (0.011 sec.)

[[20060609121502]] 1373: 『IFをあと2つ追加したいのですがエラーになってしまいます。』（たいへい）
お世話になります。下記の ... 関数を作りましたが、あとIF（TRUE=$N$5,N6/AC15*100）とIF(TRUE=$O$5,O6/AC15*100) ... ましたら教えてください。また、追加出来ない理由としてIF関数を並べる数に限界があるのか、カッコを付ける数に限 ... す。以上宜しくお願い致します。Excel2000 Windows2000 =IF(TRUE=$F$5,F6/AC15*100,IF(TRUE=$G$5,G6/AC15*100,IF( ... TRUE=$H$5,H6/AC15*100,IF(TRUE=$I$5,I6/AC15*100,IF(TRUE=$J$5,J6/AC15*100,IF( ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200606/20060609121502.txt - [detail] - similar

[[20120222152309]] 1373: 『入荷データ入力時の枝番生成（2）』（雪だるま） [[20120111115844]] 上記の質問で入荷マスターにデー ... = .Offset(Rows.Count - .Row).End(xlUp).Row - .Row If lngRows <= 0 Then ComboBox1.Clear Exit Sub End If ... = 1 To lngRows 'A列の値がTextBox6の値と等しいなら If vntData(i, 1) = vntMark Then 'DictionaryにB列の値を ... として登録 dicIndex.Item(vntData(i, 2)) = Empty End If Next i 'Dictionryに登録が有ったなら If dicIndex.Co ... 示 .ListIndex = 0 End With Else ComboBox6.Clear End If dicIndex.RemoveAll End Sub Private Sub ComboBox1_C ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201202/20120222152309.txt - [detail] - similar

[[20221022080323]] 1373: 『迷路ってvbaで作れるのでしょうか』（羽田空港）
こんなことができるのかわからないのですが、お分か ... tiveCell.Value = cnt bl = False Do Until bl = True If mystop = False Then Exit Do bl = False Call nextrn ... g cnt = cnt + 1 '********** If cnt = 2 Then Set prerng = Worksheets(1).Cells(1, 1 ... ) If NRng.Address = prerng.Offset(1).Address Then With ... in .ColorIndex = xlAutomatic End With End With End If Else iti = prerng.Row - ActiveCell.Row & _ prerng. ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/202210/20221022080323.txt - [detail] - similar

[[20070803193741]] 1369: 『ひとつのマスに複数の計算式を入れる場合』（つばめ）
見積書を作る段階で仕切り金額を粗利と掛率どち ... ない場合は空欄で収めたいです。よろしくお願いします。IF関数でよろしいんでしょうか? ---- > IF関数でよろしいん ... でしょうか? IF関数でよいと思いますけど、不都合がありますか? (Hatch ... を確認したい時「A1<>""」と言う書き方をします。どのIF関数から作って行っても良いと思いますが例えば↓の様に ... 考えてみるのはどうでしょう。 IF(条件 :Cが空欄でないか? 真の時:B÷(1-C)「Cが空欄でな ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200708/20070803193741.txt - [detail] - similar

[[20110716195114]] 1369: 『複雑な検索』（ちーず）
いつもお世話になっております。エクセルでここまでの検索が可能がどうか、 ... 検索シートのA1にキャベツ等をいれるとすれば、 B1 : =IF(ISERROR(VLOOKUP($A1,Sheet1!$A2:$G5,COLUMN(),0)),"" ... .Match(myCom, WorksheetFunction.Index(v, 0, 1), 0) If Not IsNumeric(ans) Then MsgBox "品番がありません" ... Else For i = 2 To UBound(v, 1) If i <> ans Then For x = 2 To 4 myArea = v(ans, x) If ... , 4)), 0)) Then For y = 5 To 7 myClass = v(ans, y) If Len(myClass) > 1 And IsNumeric(Application.Match(m ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201107/20110716195114.txt - [detail] - similar

[[20081112211632]] 1364: 『ランダムな振り方』（ランダム）
こんな事は無理でしょうか 4 A B C D 5 項目単価数量合計 6 abc ... m&, rest&, num&, i& targetSum = Range("D27").Value If Application.WorksheetFunction.Sum(Range("B2:B26")) ... tSum Mod 10 <> 0 Then MsgBox "解なし" Exit Sub End If Range("C2:D26").Value = "" Range("C2:C11").Value = ... = 26 To 2 Step -1 num = Int(rest / Cells(i, "B")) If num > 10 - Cells(i, "C") Then num = 10 - Cells(i, ... * Cells(i, "C") rest = rest - num * Cells(i, "B") If rest = 0 Then Exit Sub Next End Sub (Mook) ---- 面 ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200811/20081112211632.txt - [detail] - similar

[[20050627184922]] 1364: 『ユーザーフォーム』（マー）
With Worksheets("sheet2") .AutoFilterMode = False 'オートフィルタ解 ... , Criteria1:=Range("B11").Value '----------------- If .Range("A") = 0 Then msgBOX(”新規です登録ををします ... ”） End If '----------------- B11の値がsheet2のAの列にあるかを ... Long Dim msg As Integer With Worksheets("sheet2") If .Range("A1") = "" Then UserForm1.Show Exit Sub End ... If LastRow = .Range("A65536").End(xlUp).Row For n = 0 ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200506/20050627184922.txt - [detail] - similar

[[20200719165227]] 1360: 『Msg Boxのコメントプレビューが出来ない為』（謙治）
kLY様、先ほどの続きでコメントプレビューが出 ... ong Sheets("請求書入力").Select Range("C3").Select If Range("C3") = "" Then MsgBox ("担当名が未入力です。 ... " & Chr(13) & "確認して下さい") Exit Sub End If Range("C4").Select If Range("C4") = "" Then MsgBox ... 力です。" & Chr(13) & "確認して下さい" Exit Sub End If Range("C5").Select If Range("C5") = "" Then MsgBox ... 力です。" & Chr(13) & "確認して下さい" Exit Sub End If Dim 確認 If Range("C5") <> "" Then 確認 = MsgBox(" ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/202007/20200719165227.txt - [detail] - similar

[[20160420131203]] 1360: 『メッセージボックスの使い方』（らん）
初めましての質問です。ファイルを閉じようとしたとき、指定 ... rivate Sub Workbook_BeforeClose(Cancel As Boolean) If Range("C23").Value = "はい" Then If Range("G25").V ... MsgBox "赤い箇所が未入力です。" Cancel = True End If End If If Range("D34").Value = "その他" Then If Ra ... MsgBox "赤い箇所が未入力です。" Cancel = True End If End If If Range("D34").Value = "その他" Then If Ra ... MsgBox "赤い箇所が未入力です。" Cancel = True End If End If If Range("C45").Value = "その他" Then If Ra ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201604/20160420131203.txt - [detail] - similar

[[20111027111622]] 1354: 『1.VBAでファイル名の一部を一括変換』（ミニー）
はじめましてこのたびVBAで下記のような作業をしよ ... Application.FileDialog(msoFileDialogFolderPicker) If .Show = True Then myFol = .SelectedItems(1) If myF ... xtBox2.Value = Replace(myFol, myPath, myMonth) End If End If End With End Sub Private Sub CommandButton2 ... Application.FileDialog(msoFileDialogFolderPicker) If .Show = True Then Me.TextBox2.Value = .SelectedIte ... ms(1) End If End With End Sub Private Sub CommandButton3_Click( ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201110/20111027111622.txt - [detail] - similar

訪問者：カウンタ