advanced help
per page, with , order by , clip by
Results of 271 - 280 of about 37696 for IF (0.020 sec.)
[[20040321235314]] 1238
『勤務時間表』(もと)
早出開始06:00 終了07:29 定時開始07:30 終了18:00 残業開始18:30 終了21:59 深 ... た。 定時以外は時間で四捨五入でよいのですね? E3の式 =IF(A3<TIME(7,30,0),ROUND(("8:30"-A3)*24,0),0) F3の式 ... =IF(AND(B3>TIME(18,0,0),A3<TIME(8,30,0)),("18:0"-"8:30 ... ")*24,(B3-"8:30")*24) H3の式 =IF(B3>TIME(18,30,0),ROUND((B3-"18:30")*24,0),0) J3の式 ... =IF(C3<=TIME(22,0,0),ROUND((IF(D3<TIME(22,0,0),D3+"24: ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200403/20040321235314.txt - [detail] - similar
[[20070125235153]] 1238
『シートAをシートBに条件で表示したい』(Pink)
また課長から無理難題を言われました。 助けてくださ ... Str As String Dim i As Long, n As Long With Target If .Count > 1 Then Exit Sub If .Address(0, 0) <> "C1" ... Then Exit Sub n = Application.CountIf(Worksheets("Sheet1").Range("A:A"), .Value) If n = ... gBox "Order No を確認してください。": Exit Sub End If MyStr = .Value End With Set MyDic = CreateObject(" ... o n + 1, 1 To 3) n = 0 For i = 1 To UBound(MyA, 1) If MyA(i, 1) = MyStr Or MyA(i, 1) = "Order No" Then n ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200701/20070125235153.txt - [detail] - similar
[[20190131181910]] 1238
『EXCELのユーザーフォーム、そこにあるリストボックスに表示しているものから特定の情報を省きたい』( ... こを追加 Private Sub CheckBox1_Click() Dim i As Long If Me.CheckBox1.Value = True Then With Me.lst顧客リス ... ト For i = .ListCount To 1 Step -1 If .Cells(.Range("顧客分類列")) = "販売済" Then .Remo ... veItem (i - 1) End If Next End With End If End Sub 'ここまで追加 Private ... ange("A1").CurrentRegion.Rows.Count wHitFlg = True If Me.txt顧客名 <> "" Then If InStr(1, .Cells(wRow, . ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201901/20190131181910.txt - [detail] - similar
[[20130918095939]] 1238
『対象のIDがあるか時間ごとに集計したい』(ぐりむ)
今回もまたお世話になります。 久しぶりにマクロ ... ): x = h + 2 Case Is <= w(3): x = h + 3 End Select If v(0) = "LOGON" Then t.Cells(i, x).Offset(j) = "〇" ... Left), _ t.Cells(i, x).Offset(j)).Value = "〇" End If Next End With Next End Sub ダメかな・・・ (ウッシ ... Application.Match(v(3), n, 0) z = Split(v(2), ":") If Int(z(0)) >= 7 And Int(z(0)) <= 22 Then h = 4 * (z ... ): x = h + 2 Case Is <= w(3): x = h + 3 End Select If v(0) = "LOGON" Then t.Cells(i, x).Offset(j) = "〇" ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201309/20130918095939.txt - [detail] - similar
[[20180307202324]] 1238
『深夜残業時間計算』(nebukuro3)
勤務表を作成していますがお手あけですご指導願います。 C列:始業時 ... ていませんが、始業・終業時間を手動入力とします。) .=IFERROR(IF($C$5="","",VLOOKUP($B8,DB!$G:$J,3,TRUE))+I ... なの簡単だねっ」と言う浅薄なレベルで作った案 F8セル =IF(C8="20:30"*1,IF(D8<>"半休",5.5,3.5),"") <結果図> 行 ... す、改善項目がありましたら、ご教授願います。 F8セル =IF(C8="20:30"*1,IF(D8<>"半休",5.5,3.5),"") 説明不足の ... 0 9:00 5.5 から今回のシートを作成しています。 C列:=IF(G8=11,"8:00",IF(E8=11,"20:00",IF($C$5="","",VLOOKU ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201803/20180307202324.txt - [detail] - similar
[[20130408125013]] 1238
『セル内容による複数動作指定』(ごん)
別のセルに入力された数値(1から6程度)によって動作を指定で ... きる関数はないでしょうか? IF関数だと2通りの指定しかできないので、別の関数をさがし ... ,数式2,数式3,数式4,数式5,数式6,"") (GobGob) ---- >IF関数だと2通りの指定しかできないので 7通りまでできます ... を使った方がいいですね。 (se_9) ---- 分割すると2003のIF式で7通り以上分岐できる。 下記のIF式では0から15を判断 ... してAからPまで表示する。 =IF(B1>7,IF(B1=15,"P",IF(B1=14,"O",IF(B1=13,"N",IF(B1= ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201304/20130408125013.txt - [detail] - similar
[[20100913194825]] 1234
『1と英数字』(かんな)
A1セルに1と入力すれば自動でB1セルに英数字で表示できないでしょうか 2から2 ... Trim(Str(MyNumber)) ' Position of decimal place 0 if none. DecimalPlace = InStr(MyNumber, ".") ' Conver ... t cents and set MyNumber to dollar amount. If DecimalPlace > 0 Then Cents = GetTens(Left(Mid(MyN ... umber = Trim(Left(MyNumber, DecimalPlace - 1)) End If Count = 1 Do While MyNumber <> "" Temp = GetHundre ... ds(Right(MyNumber, 3)) If Temp <> "" Then Dollars = Temp & Place(Count) & Do ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201009/20100913194825.txt - [detail] - similar
[[20091209232753]] 1234
『ツールバーの配置』(とくら)
ツールバーをmsoBarTopとして作成しますが、標準ツールバーの次に隙間 ... ication.Width newr = 1 For Each cmb In CommandBars If cmb.Visible = True And cmb.Enabled = True Then If ... cmb.Position = msoBarTop Then If cmb.RowIndex = cr - 1 Then cmb.Left = ssw ssw = ss ... w + cmb.Width If ssw > w Then cl = 0 newr = 0 Exit For End If End I ... f End If End If Next If newr = 1 Then If ssw + cw < w Then ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/200912/20091209232753.txt - [detail] - similar
[[20201123200729]] 1234
『エクセルVBA シート2こ別々の参照・計算・行挿入 について』(トマト)
VBAとても初心者のため いろい ... 次入力数字」だった時 Selection.Rows.Select.Insert shift:=xlFormatFromLeftOrAbove And xlPasteValuesAndNumb ... erFormats And ("/") And K If ActiveCell.Value = K < M And K = M Then Exit Do Se ... lection.Rows.Select.Insert shift:=xlFormatFromLeftOrAbove And ("/") And K Loop End ... 次入力数字」だった時 Selection.Rows.Select.Insert shift:=xlFormatFromLeftOrAbove And xlPasteValuesAndNumb ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202011/20201123200729.txt - [detail] - similar
[[20210725221544]] 1234
『行も列もばらばらの同じ言葉を拾って、その隣に連番を振りたい』(ゆー)
学校の週案を作っています。 ... ご希望とは違うと思いますが、最初のシート用として。 =IFERROR(COUNTIF(OFFSET($G$7:$AD$7,,,ROW()-7),G7),0)+I ... FERROR(COUNTIF(OFFSET($G7,,,,COLUMN()-9),G7),0)+IF(G7="国語",0,0) ... +IF(G7="算数",300,0)+IF(G7="社会",400,0) (J7へ入力、そ ... UBound(Var, 2) For k = LBound(Str) To UBound(Str) If Var(i, j) = Str(k) Then Num(k) = Num(k) + 1 Var(i, ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/202107/20210725221544.txt - [detail] - similar
Powered by Hyper Estraier 1.4.13, with 97057 documents and 608292 words.

訪問者:カウンタValid HTML 4.01 Transitional