Results of 321 - 330 of about 37701 for IF (0.023 sec.)
- [[20121205183847]] 1228
- 『プリンタ指定して標準に使うプリンタに戻す』 (TAD) いつも勉強させて頂いております。 現行、E5セル
...
ion.ActivePrinter = "Canon iP2700 series on Ne03:" If Range("E5").Value = 1 Then Sheets("フットワーク"). ...
PrintOut End If If Range("E5").Value = 2 Then Sheets("オカケン").P ...
rintOut End If If Range("E5").Value = 3 Then Sheets("丸常").Print ...
Out End If If Range("E5").Value = 4 Then Sheets("西濃").Print ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201212/20121205183847.txt
- [detail]
- similar
- [[20150225213651]] 1228
- 『ユーザーフォームから別ファイルへ転記したい』(ちぃちゃん)
こんばんは。 今回初めてユーザーフォ ...
& myRow).Value = tot .Range("B" & myRow).Value = IIf(OptionButton1.Value, "済", "未") End With End Sub ...
もし、そうされるなら .Range("B" & myRow).Value = IIf(OptionButton1.Value, "済", "未") ここを .Range("B" ...
& myRow).Value = IIf(CheckBox1.Value, "済", "未") にかえればOKです。 ( ...
rols("CheckBox" & i).Enabled = Not CheckBox1.Value If CheckBox1.Value Then Controls("CheckBox" & i).Valu ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201502/20150225213651.txt
- [detail]
- similar
- [[20110612050046]] 1228
- 『2変数の算出』(シンヤ)
3つの変数、a, b, c をそれぞれ(例えば A1, A2, A3 に)入力することで、そ ...
Z です。 xを算出するための式は以下のものです。 d1 =IF(b<1760000,b*0.2*10+1658020,IF(b>=1760000,((b-17600 ...
00-116873)*0.38+342222+b*0.1)*10+1658020)) d2 =IF(b>=2500000, b*10*3*1.3, IF(b<2500000, 2500000*10*3 ...
*1.3)) d3 =IF(d2+e2+b*10+5000000+c*12<=a+54000000, d2, IF(e2+b*1 ...
0+5000000+c*12<=a+54000000, 0, IF(e2+b*10+5000000+c*12<=a+54000000, a+54000000-b*10- ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201106/20110612050046.txt
- [detail]
- similar
- [[20130523151242]] 1228
- 『セル内の文字列の操作』(サファ者)
IC1,IC2,IC3,IC4,IC6,IC8,IC10,IC11,IC12,IC14 この文字列を IC ...
) f = LBound(v) For i = LBound(v) To UBound(v) - 1 If Val(v(i)) + 1 <> Val(v(i + 1)) Then If i - f > 1 T ...
Else For x = f To i k = k + 1 w(k) = v(x) Next End If f = i + 1 End If Next ReDim Preserve w(1 To k) Msg ...
m cw As String Dim vw As Variant Dim i As Long Dim iFlag As Long Dim iw1 As Long Dim iw2 As Long vw = Sp ...
lit(Range("A1"), ",") cw = vw(0) iw2 = Mid(cw, 3) iFlag = 0 For i = 1 To UBound(vw) If 0 < iFlag Then i ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201305/20130523151242.txt
- [detail]
- similar
- [[20190128201105]] 1228
- 『図形をセルごとに動かす』(プログラミング学習)
プログラミング学習の練習でエクセルで簡単なゲーム ...
() '右 ActiveSheet.Shapes("??").IncrementLeft (50) If Shapes("??").Top = Range("A4").Top And Shapes("??" ...
).Left = Range("A4").Left Then UserForm1.Show End If End Sub Private Sub CommandButton2_Click() '下 Act ...
iveSheet.Shapes("??").IncrementTop (50) If Shapes("??").Top = Range("A4").Top And Shapes("??" ...
).Left = Range("A4").Left Then UserForm1.Show End If End Sub Private Sub CommandButton3_Click() '左 Act ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201901/20190128201105.txt
- [detail]
- similar
- [[20050331085328]] 1228
- 『数式を短く』(TTT)
=IF(E35="","",IF(COUNTIF(E35,"*※*")=1,"",IF(COUNTIF(E35,"*A*")=1,"弊社",IF ...
(COUNTIF(E35,"*B*")=1,"弊社",IF(COUNTIF(E35,"*C*")=1,"弊社" ...
,IF(COUNTIF(E35,"*D*")=1,"弊社",IF(COUNTIF(E35,"*E*")= ...
式を短くできますでしょうか?今関数を覚え初めで,いつも IFで繋げて逃げていますがもっといい方法があれば教えてい ...
果が同じになる条件をまとめれば多少は短くできます。 =IF(OR(E35="",COUNTIF(E35,"*※*")=1),"",IF((COUNTIF(E35 ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200503/20050331085328.txt
- [detail]
- similar
- [[20031106001432]] 1228
- 『3つのセルの評価について』(かつろ-)
またお世話になります。 以下の通り3つのセルの値を評価したい ...
、宜しくご指導の程お願いいたします。 <大丈夫な式> =IF(AND(X1="A", Y1="A",Z1="A"),1, IF(AND(X1="A", Y1="A ...
",Z1="B"),2, IF(AND(X1="A", Y1="B",Z1="A"),3, IF(AND(X1="A", Y1="B ...
",Z1="B"),4, IF(AND(X1="B", Y1="A",Z1="A"),5, IF(AND(X1="B", Y1="A ...
",Z1="B"),6, IF(AND(X1="B", Y1="B",Z1="A"),7,""))))))) <エラーが出 ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200311/20031106001432.txt
- [detail]
- similar
- [[20090722151922]] 1223
- 『アルファベットの後の数字を取り出す』(困困)
以前、困っているところ助けていただきありがとうござ ...
") .Pattern = "([A-Z][a-z]?)(¥d+)?" .Global = True If .test(txt) Then ChemicalSign = .execute(txt).item( ...
Ind - 1).submatches(ref - 1) End If End With End Function (seiya) ---- (困困) seiya様 ...
か。 .Pattern = "([A-Z][a-z]?)(¥d+)?" .Global = True If .test(txt) Then ChemicalSign = .execute(txt).item( ...
Z][a-z]*)" myReg.Global = True st = "C14H14O3N3Na" If myReg.Test(st) Then For Each v In myReg.Execute(st ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200907/20090722151922.txt
- [detail]
- similar
- [[20110730005043]] 1223
- 『合計表示と非表示の方法』(ぺり)
[エクセルのバージョン]Excel2007 新規で作表したいのですが初心者 ...
て、個数を求めるだけで良い場合 質問(1)に関しては SUMIF関数で出来ると思います。 質問(2)の方は。。。。どこを ...
空白にしたいのでしょう? 個数の所の話なら、 =IF(総数のセル="","",個数計算の式) に変更でどうでしょう ...
[6] 合計 20 × 21 10 × 2 [7] 15 × 1 [8] [9] [10] C2=IF(A2>=16,20,"") D2=IF(C2="","","×") E2=IF(C2="","",I ...
F(A2<=20,1,INT(A2/C2))) G2=IF(OR(A2="",PRODUCT(C2,E2)>=A2),"",CEILING(A2-PRODUCT ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201107/20110730005043.txt
- [detail]
- similar
- [[20111212135105]] 1223
- 『検索方法』(KJS)
Excel2003 WindowsXP 初歩的な事ですが 1項目の検索は出来ますが、2項目の場合が解 ...
ind(What:=s1, LookIn:=xlFormulas, LookAt:=xlWhole) If Not c Is Nothing Then Set f = c Do If c.Offset(, 1 ...
ue = s2 Then dic(sh.Name & "/" & c.Row) = True End If Set c = sh.Columns("B").FindNext(c) Loop While c.A ...
ddress <> f.Address End If Next If dic.Count = 0 Then MsgBox "一致するデータは ...
の場所にありました" & vbLf & Join(dic.keys, ",") End If Set dic = Nothing Set c = Nothing Set f = Nothing ...
-
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201112/20111212135105.txt
- [detail]
- similar
Powered by
Hyper Estraier 1.4.13, with 97065 documents and 608342 words.
訪問者: