アレルギー対策、自宅でできる効果的な方法とは?

教えて下さい。
エクセルの画像付きの表がメールで
添付為てきました、
其れをラインに載せて
発信する方法を
教えて下さい。

宜しくお願いいたします。

A 回答 (1件)

表そのもののスクリーンショットを撮って画像として添付する。

    • good
    • 0
この回答へのお礼

助かりました

ありがとう御座いました。
解決出来ました。

お礼日時:2017/05/19 10:32

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

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

Q<エクセル>2つのデータに間違いがないかをチェックしたい

エクセルで入力したデータが、ルールに基づいて正しく入力できているかどうかを確認するような関数はありますか?

例として(添付画像もつけさせていただきました)「粉薬」と「飲薬」を入力し、各容量を入力します。
「粉薬」と「××g」、「飲薬」と「××」は必ずセットで入力されていることが必須です。
もし誤って「粉薬」のときに「××」と入力をした場合に、間違った入力がされていることが表示されるような関数はありますでしょうか?
枠外に〇や×として表示される
セルに色がつく・・・等

色々検索をして試してみたのですがうまくいきません。
VBAなども出てきたのですが私自身知識が全くないことと、作成したデータをあまりエクセルが得意ではない人が使う可能性などを考え、できれば関数などでできれば・・・と考えています。

Aベストアンサー

=IF(NOT(ISERROR(FIND("粉薬",B2))),IF(NOT(ISERROR(FIND("g",C2))),"○","×"),"・")
b2に粉薬の文字がある場合で、かつ、(c2にgの文字がある場合には、○を表示、ない場合は×を表示)、左記以外は・を表示

Qエクセルでカタカナ、アルファベット、数字混同データの並び替え

B列にアルファベット、数字、カタカナのデータが混在していますが、
これを、カタカナ→アルファベット→数字の順で並び替えるには
どうしたらいいのでしょうか…
A列   B列   C列    A列   B列   C列

AA001 Eコン   10      AA001   クロ    20
AA001  クロ    20   →  AA001   Eコン   10
AA001  1    15      AA001   1    15

このようにしたいです。
データが更新されてもすぐに対応できるようにマクロで処理したいと考えています。
カタカナはすべて半角です。

Aベストアンサー

例えば、D列に、
カタカナ -> 2
アルファベット -> 1
数字 -> 0
になるような関数作っといて、D列を条件に並べ替えとか。

Function ValType(src As String) As Integer
 If IsNumeric(src) Then ' 数値なら0
  ValType = 0
 Else
  If Left(src, 1) Like "[A-Z]" Then ' 先頭文字が英字なら1
   ValType = 1
  Else
   ValType = 2
  End If
 End If
End Function

--
> データが更新されてもすぐに対応できるようにマクロで処理したいと考えています。

データの入力(更新)時に、勝手に並べ替えされたら困るのでは。
例えば、質問の例の左側3行目を、
AA001  1    15

AA001  シロ   45
って変更しようとしたら、シロを入力した時点で並べ替えが起こっちゃって、どこ入力してたかわからなくなるとか。

Qエクセルデータをカンマ区切り、ダブルコーテーションで囲んだデータにする方法を教えてください

はじめまして。
仕事でエクセルデータをカンマ区切り、ダブルコーテーション囲みのテキストデータにする必要があります。

例)
”111”,"222","","","","666""

このように空白のセルもあり、そのセルもダブルコーテーションで囲みたいです。
VBAで変更する方法をどこかで見かけましたが、張り付けてみましたが、上手く動きませんでした。
超初心者ですので、わかりやすく教えていただけると有り難いです。

お手数をおかけしますが、宜しくお願い致します。

Aベストアンサー

Unicode 出力の件ですが、せっかく、個人用マクロブックに納められる(つもり)ので、それを、書き換えるよりも、後づけマクロのほうがよいかもしれません。一緒にしてしまうと、Unicodeのみになってしまいますから、それも望まないし……
とあれこれ考えて、単独マクロで、Unicodeファイル判別するプログラムもつけました。BigEndien も LittleEndienも別けますが、出力は、BigEndienだけです。
こういうのは、余計なものかもしれません。

'//
Public Sub Convert2UNICODE()
'シフトJISをUnicodeに替えるマクロ
Dim stream As Object
Dim stream2 As Object
Dim fname As Variant
Dim buf As Variant
Dim b() As Byte
Dim i As Long
fname = Application.GetOpenFilename _
 ("File (*.*), *.*", 1, "ファイルオープン")
 If VarType(fname) = vbBoolean Then Exit Sub
 Open fname For Binary As #1
   ReDim b(1 To 6)
    Get #1, , b
  Close #1
 For i = 1 To 6
 buf = buf & Hex(b(i))
 Next
 If buf Like "FFFE*" Or buf Like "FEFF*" Then
  MsgBox "ファイルはすでにUnicodeです。", vbExclamation
  Exit Sub
 End If
 '-------変換プログラム-----------
On Error GoTo ErrHandler
Set stream = CreateObject("ADODB.Stream")
  stream.Open
  stream.Type = 2
  stream.Charset = "shift_jis"
  stream.LoadFromFile fname

Set stream2 = CreateObject("ADODB.Stream")
  stream2.Open
  stream2.Charset = "unicode"
  stream.CopyTo stream2
  stream2.SaveToFile (fname), 2
  stream2.Close
  stream.Close

Set stream2 = Nothing
Set stream = Nothing
Exit Sub
ErrHandler:
 If Err.Number <> 0 Then 
  Msgbox Err.Number & " :" & Err.Description
End If
End Sub

Unicode 出力の件ですが、せっかく、個人用マクロブックに納められる(つもり)ので、それを、書き換えるよりも、後づけマクロのほうがよいかもしれません。一緒にしてしまうと、Unicodeのみになってしまいますから、それも望まないし……
とあれこれ考えて、単独マクロで、Unicodeファイル判別するプログラムもつけました。BigEndien も LittleEndienも別けますが、出力は、BigEndienだけです。
こういうのは、余計なものかもしれません。

'//
Public Sub Convert2UNICODE()
'シフトJISをUnicodeに替えるマクロ
Di...続きを読む

Qエクセルで大きな写真の一部を切り抜く方法

教えて下さい。
エクセルで個人の写真を貼り付けを
為たいのですが
個人の写真は背景等が
多く写っていて
顔だけを大きく切り取り(拡大して)
(不要な背景等は削除)
四角に調節して貼り付けたいのです。

参考書を読んでもよく分からないので
教えて下さい。

Aベストアンサー

こんばんは!

トリミング、図の調整等々をすべてExcel上でやりたい!というコトでしょうか?
出来なくはないとおもいますが、PC内に入っている「ペイント」を使うのが簡単だと思います。

① プログラム → アクセサリー → 「ペイント」を立ち上げる
(白い部分「キャンバス」は極力小さくしておいた方が良いみたいです。)
② ファイル → 開く → 保存している画像を選択
③ メニュー → 「選択」の上の四角をクリック → 画像の必要部分をトリミング(ドラッグで範囲指定)
④ 選択した画像上で右クリック → コピー → ファイル → 新規 → 貼り付け

以上で必要部分の画像が表示されるはずですので、名前を付けて保存
後はExcelに画像を挿入する訳ですが、そのまま挿入するのではなく
⑤ メニュー → 挿入 → 図形(オートシェイプ)の「四角形」を好みの大きさに挿入
⑥ 図形の塗りつぶし → 図 → 先ほど保存した画像を選択 
(「枠線なし」などは好みによって変更します)

以上が当方が行っているやり方です。m(_ _)m

Qエクセルで勤務表の出勤者を抜き出したい。 日付 名前 5/16 5/17 5/18 5/19 田中

エクセルで勤務表の出勤者を抜き出したい。

日付
名前 5/16 5/17 5/18 5/19
田中 出勤 休 出勤 休
鈴木 休 出勤 休 出勤
佐藤 出勤 出勤 出勤 休


と言う表があって別のシートに日付を入れると
出勤となっている人の名前を引っ張ってくる様にしたいのですがどうすれば出来ますか?
あまり詳しくないので細かく教えて下さい。

5/16 田中 佐藤

Aベストアンサー

こんにちは!

↓の画像のように元データはSheet1にあり、Sheet2のB1セル以降1行目に表示するとします。
Sheet2のA1セルに日付を入力するとし、
Sheet2のB1セルに
=IFERROR(INDEX(Sheet1!$A1:$A100,SMALL(IF(OFFSET(Sheet1!$A1:$A100,,MATCH($A1,Sheet1!1:1,0)-1)="出勤",ROW($A1:$A100)),COLUMN(A1))),"")

配列数、Ctrl+Shift+Enterで確定! → B1セルのフィルハンドルで右へコピーすると
画像のような感じになります。m(_ _)m

QExcel関数 詳しい方教えてください

例えば
sheet1のA1に#0010入力するとD1に"可"か"不可"でるようにしたいです。A列に何も入力されていない場合は、D列に表示しないようにしたいです。
どの様にすれば良いのか分からないでので教えて下さい。

sheet2にデータ参照とします。
B列とC列に#を含む4桁の数字が入力しています。B列に含まれる#4桁の数字が"可"C列に含まれる#4桁の数字が"不可"をsheet1のD列に"可"か"不可"でるようにしたいです。A列に何も入力されていない場合は、D列に表示しないようにしたいです。(B列とC列は同じ数字は存在しません。)
画像添付は、sheet2参照となります。
教えてくださいお願いいたします。

Aベストアンサー

こんにちは、No.1の方が回答してくださったものに、Aが空欄だったら空欄 とIF式を追加してみてはいかがでしょうか。

=IF(A1="","",IF(COUNTIF(Sheet2!B:B,A1),"可",IF(COUNTIF(Sheet2!C:C,A1),"不可","")))

Qエクセル関数式の質問です。

D6列に"公、有、希、欠"が表示されたらE列、G列、H列、I列、M列、N列、O列、に数字の"0"を表示する。

何件か似た例が有るのですが応用が出来ません。

宜しくお願いします。

Aベストアンサー

またまた失礼、)消すの忘れました。

=If($D$6="公、有、希、欠",0,"")

Qエクセル 関数について

エクセル表を作成しているのですが、わからない関数について教えてください!
画像のようなデータ表(タイトル=☆☆とします)から別シートへ、基準にもとづき自動入力されるようにしたいです!

抽出先の新しいシートですが、
A1=空白です
A2=名前
B1,C1,D1,E1,F1,G1,H1=日付を順に入力しています
B2,C2,D2,E2,F2,G2,H2=日付からTEXT(B1,"aaa")で曜日を出しています
A3,A4=画像のデータから名前を出しています(=☆☆!G3)
A4,A5=画像のデータから名前を出しています(=☆☆!G4)
A6,A7=画像のデータから名前を出しています(=☆☆!G5)
A8,A9=画像のデータから名前を出しています(=☆☆!G6)

①B~Hの3,5,7,9行目に☆☆シートをもとに労働時間を抽出したい

②B~Hの4,6,8,10行目に☆☆シートをもとに出勤時間を抽出したい

③抽出する際は休みの日は空白にしたい
→☆☆!A3:F6にない曜日は空白

④抽出する際は別シートの祝日データをもとに、祝日も空白にしたい
※祝日データは別シート(シート名=祝日一覧のA1:A17に祝日の日付が入っています
→D,E,Fはゴールデンウィークのため無条件で空白

空白は✖を入れています。
横並びのデータの区切り目は・で区切っています
A列の3,4、5,6、7,8、9,10はセルを結合しています

//// A・B・C・D・E・F・G・ H
1】✖・5月1日・5月2日・5月3日・5月4日・5月5日・5月6日・5月7日
2】名前・月・火・水・木・金・土・日
3】A・7・7・✖・✖・✖・7 ・✖
4】結合・10:00・10:00・✖・✖・✖・10:00・✖
5】B・✖・5.5・✖・✖・✖・✖・✖
6】結合・11:00・✖・✖・✖・✖・✖
7】C・4・10・✖・✖・✖・4・✖
8】結合・12:00・12:00・✖・✖・✖・12:00・✖
9】D・3・8・✖・✖・✖・✖・✖
10】結合・19:00・14:00・✖・✖・✖・✖・✖



こうなるように作り上げたいのですが関数が分かりません。
IF関数やFINDを使って試行錯誤しているのですが、エクセル初心者で知識が浅すぎて入れている関数ではエラーになってしまいます。。
賢者の皆様、知恵をお貸しください。。

エクセル表を作成しているのですが、わからない関数について教えてください!
画像のようなデータ表(タイトル=☆☆とします)から別シートへ、基準にもとづき自動入力されるようにしたいです!

抽出先の新しいシートですが、
A1=空白です
A2=名前
B1,C1,D1,E1,F1,G1,H1=日付を順に入力しています
B2,C2,D2,E2,F2,G2,H2=日付からTEXT(B1,"aaa")で曜日を出しています
A3,A4=画像のデータから名前を出しています(=☆☆!G3)
A4,A5=画像のデータから名前を出しています(=☆☆!G4)
A6,A7=画像のデータから名前を出し...続きを読む

Aベストアンサー

こんにちは

ご質問の前半の①、②は単なるセルの参照なので、参照するセル位置を計算すればよいだけですね。
残りの③、④は、ご質問文だけではよくわかりませんが、空白にする条件式を作成して、上記の参照をする代わりに空白にすれば済むでしょう。
ただし、表計算で集計することを考慮した表の作り方とは思えないので、計算を面倒にしているだけとも思えますが・・・

①、②に関しては元の表から参照する位置を計算できれば、INDEXやOFFSET関数で求めることができます。
行数は、「(=☆☆!G3)」のように直接指定のようなので、名前から検索する必要はないみたいなので、単純に「抽出シート」の3、4行が元シートの4行に、5、6行が元シートの5行を…といった按配で参照できればよいので、
 行は INT((ROW()+1)/2)+2 のような計算で算出できると思います。
添付の図では4行目から実データが始まっているようなので、上記の計算にしていますが、図をよく見ると実際は3行目なのかも知れませんので、その場合は調整が必要です。

列に関しては、日付で元シートから検索するにしても、元シートに日付欄が無いようなので、どうやって照合なさるつもりなのかわかりませんが、例えば元シートの2行目の曜日表示はDATE型の値を曜日表示しているものと仮定するなら、
 MATCH(B$1,元シート!1:1,0)
で、該当する列数を得ることができます。(H列なら8、K列なら11・・・)
「出」を参照したい場合はそのまま、「退」なら+1、「計」は+2をすることで参照したい列を算出することが可能です。
あとは上記の行と列を利用してINDEXやOFFSET関数で参照すればよいだけです。

③に関しては、元シートのA~F列に該当する曜日の文字があるかをチェックすれば良いので、
 ISERROR(MATCH(TEXT(B$2,"aaa"),OFFSET(元シート!$A$1,対象行数-1,0,1,7),0))
のようなチェックをかければ判別できるでしょう。
(↑の式中の「対象行数」は①で求める、対象行の式を意味します)
他にももう少しスマートな方法がありそうな気もしますが・・・とりあえずの方法として。

④も③と同様ですが、別シートのデータがどのようになっているのか不明なのでよくわかりません。
>A1:A17に祝日の日付が入っています
とのことなので、日付で検索して該当するものがあるかないかで、ほとんど③と同様の方法で判別が可能と思います。
それぞれが作成できたなら、それらのORをとれば、求める条件になるものと思います。

これらの式を順に組み合わせてゆけば、ご希望の関数式を作成できると思いますが、一気に結果を求めようとすると式が複雑になる傾向が多分にありますので、中間集計シートを作成したり、作業列や行を利用するなどして、集計(といっても単なる参照ですが)をしやすい形に変換しておくという方法のほうがやり易いかも知れませんね。

回答を考えながら感じた個人的な感想を言わせてもらえば、計算で表示する仕組みをほとんど考慮せずに作成された表形式だという気がします。
なさりたいことは基本的には単純な参照に近い内容なので、計算の仕組みを事前に考えて全体の構成を行えば、ほとんど同じ内容の表でも、もっと簡単に計算が可能なものができるものと思います。
きつい言い方ですが、わざわざ複雑で難しいものにしておいてから、「自動計算は誰かやってくれ~」と言っいるような気がします。

こんにちは

ご質問の前半の①、②は単なるセルの参照なので、参照するセル位置を計算すればよいだけですね。
残りの③、④は、ご質問文だけではよくわかりませんが、空白にする条件式を作成して、上記の参照をする代わりに空白にすれば済むでしょう。
ただし、表計算で集計することを考慮した表の作り方とは思えないので、計算を面倒にしているだけとも思えますが・・・

①、②に関しては元の表から参照する位置を計算できれば、INDEXやOFFSET関数で求めることができます。
行数は、「(=☆☆!G3)」のように直接指定のよ...続きを読む

Qエクセル 関数について

エクセルの関数について質問です。

A1=出勤時間
B1=退勤時間
C1=休憩時間
D1=労働時間
E1=請求金額

で、
A2=18:00
A3=18:00
A4=18:00
B2=27:00
B3=23:00
B4=29:00
C2=1
C3=0
C4=1
D2=8
D3=5
D4=10
ここから本題です。
E2=¥13,000
E3=¥13,000
E4=¥15,000
になるように関数を教えてほしいです。

条件は
・D列が8時間以下の場合は¥13,000
・D列が8時間を超えた場合、残業1時間につき+¥1,000
D列が0時間の場合は¥0
です。

今試しでE2に入れている関数は
=MAX(SUM(COUNIF(D2,">=8"))*13000+SUM((D2-8)*1000),0)
です。
が、この関数だと
出勤18:00
退勤23:00
休憩0
の場合、労働時間が5時間になるわけですが、請求金額が0円で計算されてしまいます。

ここから知恵をお貸しください!
お願いします!

エクセルの関数について質問です。

A1=出勤時間
B1=退勤時間
C1=休憩時間
D1=労働時間
E1=請求金額

で、
A2=18:00
A3=18:00
A4=18:00
B2=27:00
B3=23:00
B4=29:00
C2=1
C3=0
C4=1
D2=8
D3=5
D4=10
ここから本題です。
E2=¥13,000
E3=¥13,000
E4=¥15,000
になるように関数を教えてほしいです。

条件は
・D列が8時間以下の場合は¥13,000
・D列が8時間を超えた場合、残業1時間につき+¥1,000
D列が0時間の場合は¥0
です。

今試しでE2に入れている関数は
=MAX(SUM(COUNIF(D2,">=...続きを読む

Aベストアンサー

E2: =IF(D2,13000+1000*MAX(D2-8,0),0)

QエクセルIF関数について教えてください

A列に年齢、B列に性別が入っています。年齢が50以上で男性だったら”E男”、49以下の男性だったら”他男”、50以上の女性だったら”E女”、49以下の女性だったら”他女”とするにはどうしたらいいですか?

Aベストアンサー

C1セルに以下を入れる

=IF(B1="男",IF(A1>=50,"E男","他男"),IF(A1>=50,"E女","他女"))


人気Q&Aランキング

おすすめ情報