グッドデザイン賞を受賞したウォーターサーバー >>

エクセルの関数で質問です。
平日毎日、在庫状況をエクセルシートに入力し管理していますが、今日と前営業日の在庫差数を自動で計算する関数を教えて頂きたいものです。

土日祝は在庫の増減はありません。
火~金曜日は左横の数字を差し引きする計算式で問題ないのですが、月曜日は前週の金曜日の在庫数を
差し引きしなければならない。更に祝日がある日は祝日の前平日の在庫数から差し引きしなければいけません。
4行に入力する関数のご教示をお願いします。

「エクセル関数で在庫数の増減を自動計算した」の質問画像

質問者からの補足コメント

  • 早速のご回答ありがというございます。
    IF関数の計算式を教えて頂ければ助かります。

    No.1の回答に寄せられた補足コメントです。 補足日時:2017/08/20 20:35

A 回答 (4件)

こんばんは!



3行目は手入力で、土日祝日は入力がないのですよね?

画像の配置だとC4セルに
=IF(C3="","",C3-LOOKUP(10^10,$B3:B3))

という数式を入れフィルハンドルで右へコピー!ではどうでしょうか?m(_ _)m
    • good
    • 0
この回答へのお礼

tom04さま
ご回答ありがとうございます。
希望通りのファイルが出来ました。

思ったよりも簡単な計算式でビックリです。
感謝いたします。

お礼日時:2017/08/26 06:09

C4セルに次の式を入力して右にオートフィルでコピーします。

数式中の「祝日」の意味は分かりますよね?
「だけども~もんだ~いは、B4セル。前営業日の在庫数が無い~」ので求まられません。

=IF(C3<>"",C3-OFFSET(C3,0,WORKDAY(C1,-1,祝日)-C1),"")
    • good
    • 0

色々方法はありますね


#1さん以外の方法で、例えば
・土曜と日曜の数量も入力する
・入力するが表示をしない状態にする <-例えばフォント色を背景色と同じにすれば入力値を見えないも同然になる
・土日は金曜日と同じ数量を入力する
・土日は増減ゼロ
・月曜日は増減ゼロ=金曜と同数からの増減を計算するのみ <-単純で同じ形式の数式を展開可能

・土日のフォント色設定は、条件付き書式でも良いし、月初に手作業でも良い
    • good
    • 0

if 文で、数量が空欄の日は飛ばして遡るだけでしょうね。

この回答への補足あり
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aと関連する良く見られている質問

QExcelで組み合わせが一致する行を検索したい

お世話になっております。
下記のような表で①に対してabcdのパラメータを設定してあります。
探したいもののパラメータを入力して、近いパラメータのものを割り出すことはできるでしょうか?完全一致ではなくある程度幅をもった、近しいものを探したいです(近値一致?)

いろいろ調べましたが複雑そうで挫折しています。
ご意見くださると助かります!

a b c d
① 80 10 5 5
② 20 20 50 10



補足
元データの①②…はたくさんあるので2行では終わりません。パラメータ自体はそれぞれ複雑なので昇順に並べておくのはできません。

Aベストアンサー

以下のマクロを標準モジュールへ登録してください。
検索用のシート名は「検索」です。
添付図の黄色の箇所へパラメータを設定します。
結果は緑の箇所に表示されます。
---------------------------------------
Option Explicit

Public Sub 近似パラメータ検索()
Dim sh1 As Worksheet
Dim sh2 As Worksheet
Dim pa As Variant 'パラメータa
Dim pb As Variant 'パラメータb
Dim pc As Variant 'パラメータc
Dim pd As Variant 'パラメータd
Dim ua As Variant '正常上限a
Dim ub As Variant '正常上限b
Dim uc As Variant '正常上限c
Dim ud As Variant '正常上限d
Dim la As Variant '正常下限a
Dim lb As Variant '正常下限b
Dim lc As Variant '正常下限c
Dim ld As Variant '正常下限d
Dim diff As Variant '差分
Dim maxrow As Long
Dim row1 As Long
Dim row2 As Long
Dim rsa As Boolean
Dim rsb As Boolean
Dim rsc As Boolean
Dim rsd As Boolean
Dim count As Long
Set sh1 = Worksheets("Data")
Set sh2 = Worksheets("検索")
pa = sh2.Cells(4, "C").Value
pb = sh2.Cells(4, "D").Value
pc = sh2.Cells(4, "E").Value
pd = sh2.Cells(4, "F").Value
diff = sh2.Cells(4, "G").Value
If IsNumeric(pa) = False Or IsNumeric(pb) = False Or IsNumeric(pc) = False Or IsNumeric(pd) = False Or IsNumeric(diff) = False Then
MsgBox ("パラメータエラー(数値でない値が指定されました)")
Exit Sub
End If
If pa < 1 Or pa > 100 Or pb < 1 Or pb > 100 Or pc < 1 Or pc > 100 Or pd < 1 Or pd > 100 Or diff < 1 Or diff > 10 Then
MsgBox ("パラメータエラー(正常範囲外が指定されました)")
Exit Sub
End If
If pa + pb + pc + pd <> 100 Then
MsgBox ("パラメータエラー(合計が100になっていません)")
Exit Sub
End If
'上下限設定
Call SetLimitValue(diff, pa, ua, la)
Call SetLimitValue(diff, pb, ub, lb)
Call SetLimitValue(diff, pc, uc, lc)
Call SetLimitValue(diff, pd, ud, ld)
'検索結果クリア
maxrow = sh2.Cells(Rows.count, "H").End(xlUp).row 'H列最大行取得
For row2 = 4 To maxrow
sh2.Cells(row2, "H").Value = ""
Next
'正常上限/下限設定
sh2.Cells(5, "C").Value = ua
sh2.Cells(5, "D").Value = ub
sh2.Cells(5, "E").Value = uc
sh2.Cells(5, "F").Value = ud
sh2.Cells(6, "C").Value = la
sh2.Cells(6, "D").Value = lb
sh2.Cells(6, "E").Value = lc
sh2.Cells(6, "F").Value = ld
row2 = 4
count = 0
maxrow = sh1.Cells(Rows.count, "B").End(xlUp).row 'B列最大行取得
'範囲内パラメータ検索
For row1 = 4 To maxrow
rsa = IsBand(sh1.Cells(row1, "C").Value, ua, la)
rsb = IsBand(sh1.Cells(row1, "D").Value, ub, lb)
rsc = IsBand(sh1.Cells(row1, "E").Value, uc, lc)
rsd = IsBand(sh1.Cells(row1, "F").Value, ud, ld)
'全てがバンド内なら検索OK
If rsa And rsb And rsc And rsd Then
sh2.Cells(row2, "H").Value = sh1.Cells(row1, "B").Value
row2 = row2 + 1
count = count + 1
End If
Next
MsgBox (count & "件がマッチしました")
End Sub
'上限/下限設定
Public Sub SetLimitValue(ByVal diff As Variant, ByVal base As Variant, ByRef upval As Variant, ByRef lowval As Variant)
upval = base + base * diff / 100
lowval = base - base * diff / 100
End Sub
'バンド内かチェック
Public Function IsBand(ByVal val As Variant, ByVal upval As Variant, ByVal lowval As Variant) As Boolean
IsBand = False
If val > upval Then Exit Function
If val < lowval Then Exit Function
IsBand = True
End Function

以下のマクロを標準モジュールへ登録してください。
検索用のシート名は「検索」です。
添付図の黄色の箇所へパラメータを設定します。
結果は緑の箇所に表示されます。
---------------------------------------
Option Explicit

Public Sub 近似パラメータ検索()
Dim sh1 As Worksheet
Dim sh2 As Worksheet
Dim pa As Variant 'パラメータa
Dim pb As Variant 'パラメータb
Dim pc As Variant 'パラメータc
Dim pd As Variant 'パラメータd
Dim ua As Va...続きを読む

Qエクセル データの絞り込みについて

複数の異なった文字列含むデータを一括で絞り込みを行いたいのですがお願いします。

例えば同じ列に

YHFR-みかん1212
FHKR-りんご1234
YHFR-ぶどう2221
DDSE-みかん1212
FPOI -ばなな3123
FEWR-りんご1234
RRTY-ぶどう5432
redw-ばなな3123



上記のような場合、みかん-1212とばなな-3123 りんご-1234 の文字列を含んだ
データを一括で抽出したいと思っています。

フィルターのテキストフィルターでできそうなのですが可能でしょうか?
ひとつだけを指定して抽出することはできましたが
一度に3つの文字列を含んだデータを抽出することはできませんでした。
オプションの使い方もわからないので、できれば簡単に抽出できる方法をお願いします。
ANDやORのところで文字列を並べて抽出可能なのでしょうか?
その場合は半角カンマなどで文字を区切って並べるのでしょうか?
すいませんが宜しくお願いします。

Aベストアンサー

NO2です。
仮に
シート名 データ
    A       B   C
1 メーカー型番    品名 価格
2 umber      name Value
3 tp-10-GB1212 TV1 1000
4 tp-02-GB1050 TV2 1001
5 tp-13-GB1212 TV3 1002
6 mt-14-GB1333 TV4 1003
7 ap-05-GB1212 TV5 1004
8 ap-21-GB1396 TV6 1005
9 at-22-GB1392 TV7 1006
10tp-14-GB1396 TV8 1007
11ap-15-GB1223 TV9 1008
12am-27-GB1052 TV10 1009
13ap-28-GB1050 TV11 1010
14 ・・・

と並んでいるとします。
別シートに
   A      B  C    D    E   F
1 メーカー型番 メーカー型番 品名 価格
2 *GB1050
3 *GB1052
4 *GB1212
と準備します。リボン データ
中ほどの 並び替えとフィルターの 詳細設定 をクリック
フィルターオプションの設定のウイザードが表示される。
指定した範囲 にチェック
リスト範囲   データのシートの A~C列
検索条件範囲  このシートの A1~A4
抽出範囲    D1~F1
OK ボタンをクリックしたら 6件がD~Fの二行目以下に表示されました。

毎回、同じ操作をするのが手間なら、 ボタンを配置して
マクロの記録で 操作内容を記録させます。

NO2です。
仮に
シート名 データ
    A       B   C
1 メーカー型番    品名 価格
2 umber      name Value
3 tp-10-GB1212 TV1 1000
4 tp-02-GB1050 TV2 1001
5 tp-13-GB1212 TV3 1002
6 mt-14-GB1333 TV4 1003
7 ap-05-GB1212 TV5 1004
8 ap-21-GB1396 TV6 1005
9 at-22-GB1392 TV7 1006
10tp-14-GB1396 TV8 1007
11ap-15-GB1223 TV9 1008
12am-27-GB1052 TV10 1009
13ap-28-GB1050 TV11 1010
14 ・・・

と並んでいるとします。
別シートに
   A   ...続きを読む

Q年月日の分離

年月日の分離
Excelで、2016/1/20 を年月日に分けて表示したく、
2016、1、20と表示させることできました。
しかし、データそのものは3つとも、2016/1/20のままです。
データを3つに分ける方法ありませんか。
値複写では、2016/1/20のままです。
left、mid、right関数は思いつきました。
しかし、これでは1桁、2桁ある月日の「場合分け」がありそうで面倒です。
確定申告の医療費の集計で、全件不可の通知があり、この問題と解釈しました。
なお、環境はWin10、Excel2013です。

Aベストアンサー

year,month,day,それぞれに関数をつけてググれば
いっぱい出ます。

QExcelVBAを武器に就活

こんにちは

私は現在25歳のフリーターです。
来年度就活する予定なのですが、その就活のためにExcelVBAを勉強中です。

そこで質問があります。
ExcelVBAを使ったお仕事に就きたいと考えているのですが、
ExcelVBAを独学である程度使える人を募集する会社などはあるのでしょうか?

先ほど自分で探してみた結果、ExcelVBAの経験者のみや、他の言語も併せて使える人(JavaだったりAccsessVBAだったり)と募集要項にありました。

プログラマになりたいわけではないのですが(できればExcelVBAを使いばりばりマクロなどを書いていきたいです)、主にExcelを使った仕事に就きたいと考えた場合、ExcelVBAだけをある程度使えるというのはやはり就活の武器としては弱いのでしょうか?

ご回答いただけるとありがたいです

Aベストアンサー

返事ありがとうございます。
#4で挙げた人は、30歳でVBAの世界でデビュー?だったかな。
でも、この人は、VBAが好きだったのだろうと思います。
やはり最終的には、数学の出来・不出来が影響しているような気がしてなりません。

プロレベルのVBAの世界に入り込めた人は、正直なところ羨ましいです。
本人の努力もありますが、ラッキーな部分もあるからです。
時代の波に乗ることは大事なことかもしれません。

25歳ぐらいだったら、どこでも潜り込めると思います。
まだ、若い方だから言えるのは、資格の三種の神器を心がけてください。
PC系、語学系、ビジネス系 (例:MOS, TOEIC, 簿記)

>契約社員だったら実務未経験のExcelVBAを使える人募集中というのが結構ありましたし、
逆に、契約社員だから、実務経験なしでも、Excel VBAの使える人を求められるのかと思います。契約社員だから、Excel VBAを作らせて、それが終われば「さようなら」になるのかもしれません。

私が最初にマクロを教わったのは、Excelではありませんが、元派遣で働いていた人からですが、その人は、マクロなんてそんなに必要ないのでした。とにかく、入力が速いし、タフだからです。入力のコツも、その人から教わりました。

その人からみると、マクロのコードを考えるよりも、すぐに打ち込んだ方が完成が速いと教わりました。それでも、私は、入力スピードは、英文1800 和文 670[変換あり] (各10分)の証明書を貰っています。私は、教えてはいませんが、一応、PCのインストラクターです。

マクロひとつで、数人分の仕事をしてくれたり、朝からお昼まで掛かるような面倒な計算さえ、10分の自動実行で印刷まで出来てしまうわけです。マクロなしでは仕事ができない状態になっていました。

その後、私は、単発で働いたりした場合、マクロを作っても、昼ごはんをおごってやればよい、とか考える人や、コーヒー一杯で済むだろうとか、どこからか他人のマクロを持ってきて、会社に合うように作り変えてくれとかいうのですが、お金のことを言ったら、怒り始めました。一番、ひどい話が、記録マクロで1万行を越えてしまったものを、直してくれと持ち込まれた時です。どうか、私のようにはならないでください、としか言えません。

プライベートでマクロやVBAを楽しみながら、表ではOffice のExcel, Word を使えますということで、MOSの資格を履歴に書いておくぐらいで、本来は十分だと思います。

それと、やるやらないは別として、VBAに関係するものは、前回のVSTOを始め、一通り用意しておいても損はないと思います。ですが、VBAが、このまま続くのか、私は疑心暗鬼です。

それと、今の私の参考サイト
http://www.ka-net.org/index.html

Excel情報に明るいおすすめサイト5選
Mougを始め、有名なところです。
http://excel-master.net/miscellaneous-knowledge/excel-recommended-5site/

書籍では、mougの大村あつしさんのVBAの本ををお薦めします。

返事ありがとうございます。
#4で挙げた人は、30歳でVBAの世界でデビュー?だったかな。
でも、この人は、VBAが好きだったのだろうと思います。
やはり最終的には、数学の出来・不出来が影響しているような気がしてなりません。

プロレベルのVBAの世界に入り込めた人は、正直なところ羨ましいです。
本人の努力もありますが、ラッキーな部分もあるからです。
時代の波に乗ることは大事なことかもしれません。

25歳ぐらいだったら、どこでも潜り込めると思います。
まだ、若い方だから言えるのは、資格の三種の神...続きを読む

Qエクセルセルに色を付けて、列、行を削除しようが色が取れなくする方法。

エクセルで 例えばA1セルに黄色の色をつけて、A列を削除しようが、1行目を削除しようが、再度A1がまた黄色になる方法は?

Aベストアンサー

[No.1お礼]へのコメント、
》 適用範囲は適応先でいいんでしょうか
あ、間違っていましたね。
添付図を見れば分かるように、「適応先」でもなく「適用先」ですね。
意味は大同小異ですが。

》 列挿入になると消えるようだが・・。
「適用先」の「=$A$1:$ZZ$1000}を「=$1:$1048576」に変更したらどうなりますか?
(Excel 2013 の場合)

Qエクセル関数の不思議?

エクセル関数でお聞きします。
別表のようにc5に 258と数値があります。
これを 6行目に Left関数、Mid関数、Light関数で それぞれ 2,5,8と分解します。
次にこの 2,5,8を Sum関数で =sum(c6:e6)で計算すると 0と表示されます。
次に =c6+d6+e6 で個々に足し算すると 正解の15が表示されます。
これはなぜでしょうか。
また、今状態で SAM関数で正解を導くことはできますか?

Aベストアンサー

LEFT等で抽出したものは文字列となるからでしょうね。
SUMに反映させたければ、6行目の式の最後に*1とか+0を追加してみましょう。

QCOUNTIFSについて教えてください!

COUNTIFSを使って、集計をしようと思っていますが上手くいかない点が2つあります。
下記のような形で入力しております。
=COUNTIFS(E$4:E$23,">=50",E$4:E$23,"<60")

①年齢集計をしていますが、58歳や52歳といった○○歳という単位をつけるとカウントしてくれません。やはり単位は省いて数字のみを入力する方法しかないでしょうか?

②別シートのセルより数字を反映させて表を作成しましたが、反映させた数字にはCOUNTIFSがカウントしてくれません。反映方法は =sheet2!A3&"" といった感じで行っています。
反映した数字ではカウントは不可能でしょうか?

助言のほど、よろしくお願いします。

Aベストアンサー

1.指定した「数値」では無いから当然です。
  ”58歳”という「文字列」ですよね。
 No.1でも回答がありますが、「セルの表示形式」を「ユーザー定義」にして「0歳」と指定することで、
 「52」と数字を入力するだけで「52歳」と表示されるようになります。

2.やはりこれも「文字列」になっています。
 参照している値が”58歳”のような「文字列」でも正しくカウントされません。
 「数値」になるように工夫しましょう。
 この場合は
 =Sheet2!A3
 だけで十分です。
 &""を付けることで「文字列」になってしまいます。
 (逆に *1 を付けると「文字列」の数字は「数値」になります。文字列の数字は四則演算で計算が可能で数値として扱われ四則演算の結果は「数値」が返ります)

QExcelで2つ1組の数値の内、1つの数値を別の数値とセットにする方法

①のシートのA列に型番、B列にシリアルが入っており、②のシートのA列に型番のみが入っています。
①と②の型番は完全一致しているものもあれば、型番の末尾が途切れてしまい完全一致しないものもありますし、数文字しか一致しないものもあります。
②の型番の隣に①のシリアルを入れたいのですが、何かうまく関数を使えば簡単にできるでしょうか?

型番をそれぞれ昇順にして貼り付けようとしたのですが、①と②の型番が完全一致ではないため、同じ並びにならず、そのまま貼り付けることができません。
何かいい方法があれば教えて下さい。
宜しくお願い致します。

例】
①シート
A列 B列
ABC 1234
PQR 2345
STU 5678
XYZ 1209
②シート
A列 B列
TU
XYS
PQR
BC

分かりづらかったらすみません。。。
宜しくお願い致します。

Aベストアンサー

部分的に重複しているような型番もあるのでしょうか?
ABCとABDという型番があり、②に欠けたABという型番があった場合、ABCかABDか判断する方法が無いと思います。
また、②のXYSというのはXYZが間違えて?入力されているような場合を想定していると思われますが、それもどの程度の一致で判断するのでしょう?
②にXYSとあって、①にXYZとEYSが存在した場合、どちらと判定すればよいか分からないと思います。

何らかの判断基準を決めたとして、
まずVLOOKUPで完全一致を探し、一致したもののシリアルを取得します。
フィルタを使い、エラー表示のものだけ表示し、式の内容を変更します。

判断基準の優先度が高いものから順に試します。
場合によっては①のA列とB列の間に列を挿入し、判定用の補助セルとして使います。
例えば、前から5文字一致したら同一とみなす。とした場合、
VLOOKUPとLEFTにより、左から5文字抽出したものが一致した場合にシリアルを取得します。
先ほど同様にフィルタでエラーのものだけ表示させ、また別の条件の式を入力します。

例えば今度は右から5文字一致したら、とかでしょうか。
あるいは②の文字が欠けているとして、②の全てを含むセル。という条件もあるでしょう。
この場合SUMPRODUCTやFIND、INDIRECT、ROW等を使い、一致するものがある列の行番号を取得する必要があると思われます。

データの数にもよりますが、残り少なくなれば判定式を考えるより目で見た方が早いかもしれません。

自分が思いついたのはこの程度です。
人間が条件を指定してあげないと機械も判別できないですよ。
もっと上手いやり方もあるかもしれないので、他の回答者に期待。

部分的に重複しているような型番もあるのでしょうか?
ABCとABDという型番があり、②に欠けたABという型番があった場合、ABCかABDか判断する方法が無いと思います。
また、②のXYSというのはXYZが間違えて?入力されているような場合を想定していると思われますが、それもどの程度の一致で判断するのでしょう?
②にXYSとあって、①にXYZとEYSが存在した場合、どちらと判定すればよいか分からないと思います。

何らかの判断基準を決めたとして、
まずVLOOKUPで完全一致を探し、一致したもののシリアルを取得します。
...続きを読む

QExcel 重複する日付が特定条件の何回目か計算する

とある1室を使用する有料の集まりがあります。同一日には内容A,B,Cのいずれか
1つが1回だけ開催され、Aに参加すると100円、Bなら200円、Cでは300円を、翌月
最初に参加したとき清算します。清算時点で、紙の出席簿に基づいて以下のような
シートが作られます。

名前 清算 参加 金額 内容-回目
山田 5/10 4/11 100 A-1
山田 5/10 4/16 200 B-1
山田 5/10 4/21 200 B-4
山田 5/10 4/27 100 A-4
鈴木 5/10 4/10 300 C-1
鈴木 5/10 4/13 300 C-2
鈴木 5/10 4/21 200 B-4
鈴木 5/10 4/25 300 C-3
鈴木 5/10 4/27 100 A-4
佐藤 5/11 4/11 100 A-1
佐藤 5/11 4/13 300 C-2
佐藤 5/11 4/18 200 B-3
佐藤 5/11 4/21 200 B-4
佐藤 5/11 4/26 100 A-3
佐藤 5/11 4/27 100 A-4
田中 5/12 4/15 100 A-2

この表の末尾の田中さんの行で100と入れ終わった段階で、「内容-回目」の列に「A-2」を
表示させ、同時に山田さんの4行目が「A-3」から「A-4」に(鈴木さんの4行目や佐藤さんの
5行目も同様に)変わるようにするには、「内容-回目」の列にどのような関数を入れれば良い
でしょうか。

とある1室を使用する有料の集まりがあります。同一日には内容A,B,Cのいずれか
1つが1回だけ開催され、Aに参加すると100円、Bなら200円、Cでは300円を、翌月
最初に参加したとき清算します。清算時点で、紙の出席簿に基づいて以下のような
シートが作られます。

名前 清算 参加 金額 内容-回目
山田 5/10 4/11 100 A-1
山田 5/10 4/16 200 B-1
山田 5/10 4/21 200 B-4
山田 5/10 4/27 100 A-4
鈴木 5/10 4/10 300 C-1
鈴木 5/10 4/13 300 C-2
鈴木 5/10 4/21 200 B-4
鈴木 5/10 4/25 300 C-3...続きを読む

Aベストアンサー

メインの表をA~G列、別表をH~M列で作成しましょうか。
(※画像の青字は自動で表示されます)

1.E2セルには、=IF(D2="","",IF(D2=100,"A",IF(D2=200,"B","C"))) と入力し、オートフィル(下へ連続コピー)。
2.F2セルには、=IF(E2<>"","-","") と入力し、オートフィル(下へ連続コピー)。
3.G2セルには、=IF(D2="","",IF($E2="A",VLOOKUP($C2,$H:$I,2,FALSE),IF($E2="B",VLOOKUP($C2,$J:$K,2,FALSE),IF($E2="C",VLOOKUP($C2,$L:$M,2,FALSE))))) と入力し、オートフィル(下へ連続コピー)。
4.H2セルには、=IF($E2="A",IF(COUNTIF(H$1:H1,$C2)>0,"",$C2),"") と入力し、オートフィル(下へ連続コピー)。
5.I2セルには、=IF(H2="","",RANK(H2,H:H,1)) と入力し、オートフィル(下へ連続コピー)。
6.J2セルには、=IF($E2="B",IF(COUNTIF(J$1:J1,$C2)>0,"",$C2),"") と入力し、オートフィル(下へ連続コピー)。
7.K2セルには、=IF(J2="","",RANK(J2,J:J,1)) と入力し、オートフィル(下へ連続コピー)。
8.L2セルには、=IF($E2="C",IF(COUNTIF(L$1:L1,$C2)>0,"",$C2),"") と入力し、オートフィル(下へ連続コピー)。
9.M2セルには、=IF(L2="","",RANK(L2,L:L,1)) と入力し、オートフィル(下へ連続コピー)。
4.D列に「金額」を入力すれば、「内容-回目」は自動で表示されます。
5.[ファイル][印刷範囲][印刷範囲の設定]で、A~D列を設定すれば、メインの表のみ印刷されます。

メインの表をA~G列、別表をH~M列で作成しましょうか。
(※画像の青字は自動で表示されます)

1.E2セルには、=IF(D2="","",IF(D2=100,"A",IF(D2=200,"B","C"))) と入力し、オートフィル(下へ連続コピー)。
2.F2セルには、=IF(E2<>"","-","") と入力し、オートフィル(下へ連続コピー)。
3.G2セルには、=IF(D2="","",IF($E2="A",VLOOKUP($C2,$H:$I,2,FALSE),IF($E2="B",VLOOKUP($C2,$J:$K,2,FALSE),IF($E2="C",VLOOKUP($C2,$L:$M,2,FALSE))))) と入力し、オートフィル(下へ連続コピー)。
4.H2セルには、...続きを読む

Qイコールから始まらない式ですが、写真のようにプラスを除いて数字を抽出し、各々のセルに分けるにはどんな

イコールから始まらない式ですが、写真のようにプラスを除いて数字を抽出し、各々のセルに分けるにはどんな関数あるいはVBAでできるのでしょうか。
数字は1桁〜4桁がランダムにある、数値は最大20個あると仮定してお願いします。。

Aベストアンサー

VBAなら、こんな感じですね。

Range("E2").TextToColumns Destination:=Range("E7"), Other:=True, OtherChar:="+"


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング