目次:

はじめに(自己紹介)

自分らの取り組み

応用

注意点

終わりに

 

はじめに

ブログを久々に更新したのと、読者層がほかの記事とこの記事では違うため自己紹介をさせていただきます。

ツイッターでは@hiro_yuna75で活動しているものです。

彼氏がこのブログを書かせていただいております。

普段はこのブログは、エクセル系(PC関連)の記事が中心ですが、今回からは恋愛系の記事も書いていければいいと思っています。

 

自分らの取り組み

タイトルにもあるように、今回の記事はツイッターでアンケートを取った結果に基づいて、「愛情表現について」です。

表現といっても、いろいろと方法があり、文字やイラスト、声やしぐさ、行動で示すなど様々です。

二人の微妙な距離感がそれを示していることもあります。

私たちは、デート中に「好き」を伝えあったり、電車の中で荷物を持ったり、階段を下るときに「足元気を付けて」と言ったりこまめに休憩を入れようかと提案したりしています。

これらが意味するのは、恋人関係という特殊な関係性を維持するためにその特殊性を自らに確認しあうことです。

単なる気遣いにとどまることなく、その人だからすること(より正確には恋人関係にある人だからすること)という認識のもとに行うことが大切であるといえます。

デートプランの共有や、ちょっとしたサプライズ、そして余裕ある行動は物理的な関係性を維持しそれが精神的な安心感につながるということです。

 

応用

あなたたちの恋人関係が具体的にどういうものかによって応用の仕方は異なります。

付き合って間もないのか、破局寸前なのか、遠距離なのか、社会人なのか、あらゆる側面から考えてみましょう。

さて、紙とペンを用意してください。

紙を横に分割して、左側にあなたの名前、右側に恋人の名前を書きましょう。

その下に、職業、会う頻度、好きなもの、嫌いなものなどを列挙していきます。

できましたか?ゆっくりでいいので、書いてみましょう。

すると、不足している部分、今の関係性が見えてきませんでしょうか。

もし仮に、会う頻度が低いのであれば、直接会ってという手段は現実的でありません。

好きなものがわからないのに、サプライズするのもよくありませんね。

頻度が低いのなら、電話や手書きの文章を写真に撮ってラインに送る、次のデートプランを一緒に考えることも得策でしょう。

好きなものがわからないのであれば、直接聞くことや、自分はこれが好きだけど、あなたは?と自己開示とともに聞いてみるのもいいでしょう。

そうして、知りえた情報は、恋人をより好きになるきっかけになると思います。

手紙や、通話、会って伝えるという言葉による表現では、具体的にそれらを伝えることが愛情表現につながるし、行動においては、その模倣が表現の一つになるでしょう。

 

注意点

何事も無理やりするのはよくありません。

話題の間に挟むのもよいでしょう。

もし、話題が見つからないようでしたら、この記事を話題にしてはいかがでしょうか。

「こんな記事見つけたんだけど」とURLや記事を見せることで、話題が広がり、お互いを知ることにつながるのではないでしょうか。

また、手段や方法というのはあくまで結果を示すためにつかうものですから、それに縛られることはありません。

多くの方法を試して二人にとって適切なやり方を見つけましょう。

 

終わりに

お互いの不安を払しょくするための表現というのは多くの場合長くはもちません。

不安なら不安だといえば、正常な関係性ならばお互いの不足している部分を補ってくれることでしょう。

それが、同性同士の恋愛であっても、同じです。

良い恋愛を。Good lover was made by good mind.

 

感想やRT、よろしくお願いいたします!!

 

まずはじめに

お久しぶりです。長いこと更新をしていませんでしたが、今日からぼちぼち再開していこうと思います。
 
再開記念は「献血」です。
 
今回は献血の流れを見ていこうと思います。
 
ちなみに私のいつも行っているところは秋葉原の献血ルームです。
場所によって違うかもしれませんのでご了承ください。
 

献血ってそもそも何?

献血というものを簡単にご説明します。

献血は、けがや病気で輸血が必要な方のために自分の血液を分けること、という解釈でいいと思います。

輸血が必要な方は

がん患者の方が多いんです。

ケガじゃなんですよね。

 

意外ですよね。

献血ってどうやるの?

献血をやる方法はいくつかあります。
献血車と献血ルームです。
前者はよく町で見かけるかと思います。献血ルームは常設の施設です。
定期的、またはある程度予定の合間に行くことがあれば献血ルームでやることをお勧めします。
 

献血の流れ

献血ルームに行きます。初めての方は身分証を持参してください。
献血カードの発行が終わりましたら、シークテストを行います。詳しい説明は省きますが、両腕を横に伸ばして肘を曲げ肩に手を当てるテストでもいいましょうか。
血流の流れを確認するテストのようです。
その後、簡単な問診を行います。
問診のあとは献血をします。献血自体は種類にもよりますが長くて1時間、短いと30分前後です。飲み物や漫画を読みながら献血を受けられます。

献血の種類と献血の際の注意点

献血には4つの種類があります。
200ml献血
400ml献血
成分献血(赤血球)
成分献血(血小板)
です。
 
200ml献血と400ml献血は体重により違います。
体重が50kg未満の人は400ml献血は受けられません。
なお、成分献血は受けられます。
 
一人当たりにとる血液量は多いほうがいいそうなので、400ml献血をできる方はぜひそちらをお選びください。時間はそれほど変わりません。
 
成分献血は一般の献血と違い、特定の成分をとるものです。
まず、普通の献血(200、400ml献血)のように血液をとり、機械にかけて特定の成分を抽出したのち、残りの血液を体内に戻します。
時間は1時間ほどなので、時間のある方がやるといいと思います。無理してまでやる必要はありませんからね。
検査が終わりましたら、ゆっくり休んで、帰宅となります。
検査結果は後述するラブラッド(web)やはがきで分かります。
 
注意点なのですが、
海外旅行に最近行かれた方(家族等も含む)や性行為をした方(過去6か月)などに該当する方は献血はできませんのでご注意ください。
仮に、忘れていて献血をした場合でも、献血後の検査で引っかかれば実際の輸血には使われませんのでご安心下さい。
また、献血後に気づいた方は、電話をすればよいので、気づいたら連絡を取るのが良いかと思います。

ラブラッドのお知らせ

ラブラッドとは、複数回の献血をしてくださる方向けのもので、メールアドレスなどの登録をすることで、予約や検査結果をPCやスマホで見れるものです。
登録は赤十字のホームページからできます。
ラブラッドはこちらから。
 

特典について

何十回と重ねていくと、特典がもらえます。10回で、20回で、といった具合です。
 
また、ラブラッドでの予約や、実際の献血をすることでポイントがもらえ、それが一定以上たまると物品交換ができます。
これは回数によらないものです。ラブラッドに登録すると、発生するポイントとなります。
交換品はかなり実用的です。
 
また、献血終了後には、何かしらくれます(笑)
イベントなどやっている場合もあり、それが楽しみで行くこともあります。
アニメ「隣の吸血鬼さん」がやっていた時期は、それにちなんだものを頂いたこともあります。(アキバ限定だったかもしれませんが)
地域的なイベントもありますので、イベントの時だけ行くというようなことでもいいかもしれませんね。
 
楽しい献血ライフを送ってくださいね!
 
 
 

Excelの関数:頻出別

 

1.sum関数

この関数は「合計」を調べるものです。

1から18までの合計は171となります。

書式   =SUM(範囲)

具体例: =SUM(A2:V3)              =SUM(A1,A3,B34)

 

2.AVERAGE関数

この関数は「平均」を調べるものです。

1から18までの平均は9.5となります。

書式:=average(範囲)

具体例:=AVERAGE(A2:V3)              =AVERAGE(A1,A3,B34)

 

3.MAX関数

この関数は「最大値」を調べるものです。

1から18までの最大値は18となります。

書式:=MAX(範囲)

具体例:=MAX(A2:V3)  =MAX(A1,A3,B34)

 

4.IF関数

この関数は「条件分岐」で様々な処理をすることができます。

書式:IF(論理式,真の時,偽の時)

※論理式:大小、等しいなどあるものとあるものを比較する

※真のとき:論理式が成立するとき

※偽の時:論理式が成立しないとき

 

A1に「3」が入っているとき

具体例:=IF(A1<4,"〇","×")

説明:「論理式」A1が4より小さい時

    A1には3がはいっており、4より小さいので、真のときになる。よって、IF文を打ち込んだセルには〇が入る。

   〇、×のように、文字列の時は「""」で囲まないといけない。論理式、真、偽はすべて「,」で区切る。

IFの中にIFを入れることもできる。先ほどの具体例を基にすると、

=IF(A1<4,IF(A1<2,OK,NG),"×") といった具合にする。

 

真の時の処理をIFとするのである。A1には3があるので、真のとき。真の時のIFの中身はA1<2が論理式であり、これについては偽であるので、偽の処理をすると、「NG」が入る。

 

4.VLOOKUP関数

検索用の関数で、必要な要素が多いので注意。

 

書式:=VLOOKUP(検索値,,範囲,列番号,検索方法)

説明 検索値:もとになる数(例として3をあげる)

    範囲:検索をする範囲(例としてA1:B4)をあげる

    列番号:範囲のうち、何番目の列の情報を出力するかということ 

    検索方法:完全一致が基本(false)

 

A1からA4までを1~4

B1からB4までをA~Dとする

 

=VLOOKUP(3,A1B4,2,FALSE) 

とすると、Cと出力される。

 

 

 

以上

 

 

 

マウスを購入した

こんばんわ。今日、新しいPCのマウスを購入しました。ご購入はこちら
前はPCを購入した際に付属品としてついてきた無線マウスを使っていましたが、電池の心配や、新しいマウスが欲しいという気持ちから、
有線のマウスを購入しました。
アマゾンで購入しましたが、使い心地は良好。
 

詳細

メーカーはバッファロー。ボタン数は5で、ホームページを戻る、進むというボタンがあります。
色は黒を選びましたが、ホイールボタンがやや青く光ります。バックで青色のLEDライトが点灯します。
USB接続で、3.1にも対応します。
コードの長さは1.5m。かなり長いです。
 
アマゾンに乗っているマウスの画像です。画像から見てもわかる通り、人間工学に基づいた設計によってかなり使いやすい形をしています。
PCのマウスで迷っている方はぜひ選択肢に入れてみてくださいね。
 
※ゲーミングマウスではありません。

追加修正した

こんばんわ。
書籍検索について、複数の検索結果を表示できるようにしました。
具体的には、あいまい検索というやり方で行えるようになります。
例えば、「りんご」という文字列を検索するとき、今までは「りんご」という文字列を入力しなくてはいけませんでしたが「りん」や「り」「ご」という部分から抜き出せるようにしました。
「test」という文字列を検索すると、「test」「test2」「test3」という「test」という文字列の入ったのデータが、抽出されます。
 
 
like関数という関数を使いました。
 
With Sheets("記録")
i = .Cells(.Rows.Count, "A").End(xlUp).Row '最終行

keyword = "*[txt本]*"
For c = 2 To i
  rng = .Cells(c, 1).text
 If rng Like keyword Then 'エラーの原因?
  'MsgBox rng & "テスト"
     word = .Cells(c, 2)
     .Cells(c, 8) = word '一度転記する
     word = .Cells(c, 2) '再び戻す
     frm複数検索.lst結果.AddItem word
     Else: MsgBox "該当するものはありません", Buttons:=vbExclamation, Title:="処理結果"
  End If
 Next
   frm複数検索.Show
  MsgBox "処理が終わりました", Buttons:=vbInformation, Title:="システム"
  End With
 
コードは以上の通りです。
 
参考になさってください。
frm複数検索は、単純に表示される、リストボックスがあるだけです。
 
 
以上です。
 
 
 
最後になりますが、今まで開発をしてきた読書記録を公開していきます。
グーグルドライブからダウンロード可能です。
 
また、感動やご意見のある方は、以下のメアドに感想・改善点などを願いします。
お金を払ってでも使いたいなと感じたら義務ではありませんがアマゾンのギフトカードを以下のメアドに送っていただけると幸いです。
 
excel.vba.develop@gmail.com にて感想など伺います。
 
 
以上です。
開発は今後も続けていく予定です。