
エクセルの関数について質問です。
①
A____B_______
佐藤 2011/5/2
佐藤 2011/8/25
佐藤 2012/1/8
山田 2011/6/7
山田 2012/2/13
高橋 2010/7/10
高橋 2010/11/1
高橋 2010/12/5
高橋 2011/2/10
というデータから、
②
A____B________
佐藤 2011/5/1
佐藤 2011/9/1
山田 2011/6/1
山田 2011/8/1
高橋 2011/1/1
高橋 2011/2/1
のデータの日付に一番近い日付を
①のデータから抽出する関数を教えて頂きたいです。
指定日に一番近い日付を、
未来と過去から抽出する関数です。
分かりづらくて申し訳ございません。
ご教示願います。
よろしくお願いいたします。
iPhoneから送信
No.3ベストアンサー
- 回答日時:
もし、
D1に 入力された、
日と 同じ日を、
抜き出したいのなら、
此ですかね?
ファイル、
https://1drv.ms/x/s!AjviygfJDgV_3CyTu_uDNnR5Xlwk
尚、
ファイルは 必ず、
エクセルで 一度、
開き、
ローカルに 別名保存を、
してくださいね、
別名保存でないと、
意味が 無いですよ。
そうすれば、
閲覧も、編集も、
可能に なると、
思います。

No.4
- 回答日時:
こんばんは!
手っ取り早くVBAでの一例です。
↓の画像のように元データはSheet1の2行目以降にあり、Sheet2の2行目以降のC列に表示するとします。
標準モジュールです。
Sub Sample1()
Dim i As Long, k As Long
Dim wS As Worksheet
Dim myDate
Set wS = Worksheets("Sheet2")
With Worksheets("Sheet1")
For i = 2 To wS.Cells(Rows.Count, "A").End(xlUp).Row
For k = 2 To .Cells(Rows.Count, "A").End(xlUp).Row
If .Cells(k, "A") = wS.Cells(i, "A") Then
If myDate = "" Then
myDate = .Cells(k, "B")
Else
If Abs(.Cells(k, "B") - wS.Cells(i, "B")) < Abs(myDate - wS.Cells(i, "B")) Then
myDate = .Cells(k, "B")
End If
End If
End If
Next k
wS.Cells(i, "C") = myDate
myDate = ""
Next i
End With
End Sub
※ 最直近日が過去・未来で複数ある場合、最初に出現した日付が表示されます。
万一、該当データが複数あり、すべて表示したい場合はコードも変わります。
まずはこの程度で・・・m(_ _)m

No.1
- 回答日時:
もしかして、
同月の、
月末 月初、
ですか?
お使いの Excelの、
バージョンでは、
EOMONTH構文は 使えますか?
一例として、
2011/5/2
で、
添付映像にて、
お示し しましょう。

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
SQL文で パラメータが少なすぎ...
-
Excleピボットでデータのない部...
-
アクセスのクエリー作成
-
VBA 別シートの同じ日付の欄に...
-
年度ごとの最大値
-
Accessの日付時刻型から日付、...
-
日付型のフィールドに空白を入...
-
Access クエリで、レコードの無...
-
Excel→Accessへの日付データの...
-
【エクセル】指定した日付に一...
-
アクセスで日付を入力すると曜...
-
アクセスの昇順並び替えで空白...
-
Aceess2000で8桁の数字を日付型...
-
Accessのデータ型の日付/時刻型...
-
【vba】日付の形式が勝手に変わ...
-
前のレコードの合計に現レコー...
-
ACCESSの空白をカウントする
-
エクセルのWEBクエリで取り込め...
-
エクセル-過去6カ月分の合計を...
-
アクセスで月単位の抽出
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
日付型のフィールドに空白を入...
-
SQL文で パラメータが少なすぎ...
-
Excleピボットでデータのない部...
-
年度ごとの最大値
-
アクセスのクエリー作成
-
VBA 別シートの同じ日付の欄に...
-
アクセス:既定値に土日含まず...
-
アクセスで日付を入力すると曜...
-
Excel→Accessへの日付データの...
-
指定日付を起点にして最新日付...
-
ACCESSの空白をカウントする
-
Accessのデータ型の日付/時刻型...
-
Accessの日付時刻型から日付、...
-
BCPでCSV内の文字列をテーブル...
-
エクセル-過去6カ月分の合計を...
-
前のレコードの合計に現レコー...
-
【vba】日付の形式が勝手に変わ...
-
アクセスで月単位の抽出
-
Access クエリで、レコードの無...
-
アクセスの昇順並び替えで空白...
おすすめ情報
ご回答ありがとうございます。
例えばの日付で1日にしましたが、
月末や月始めではなく実際はバラバラです。
情報が足りず申し訳ございません。
ご回答ありがとうございます。
勉強、知識不足のため情報が少なく
大変申し訳ございませんでした。
②のデータのC列に①のデータの該当する日付を
抽出し表示したいです。
未来、過去同日で別々に抽出し、
指定日との差を出し一番近いものを選択しようと考えておりました。
未来と過去が同じだった場合は同じという結果が欲しいです。
質問して頂いた内容からずれていたら申し訳ございません。
ご迷惑、お手数をおかけいたしますが、
何卒よろしくお願い致します。
ご丁寧に本当にありがとうございます!
できました(T_T)