ushi2015 の回答履歴

町の飲食店やスーパーに置いているフリーペーパーを取ろうと思いますか？ スポーツジムの無料体験のチラシ（実際はこれでは無いですがこの様なチラシです）を いろんな店舗に置かせてもらって、（店舗側にはマージンなど無し） そのチラシからの問い合わせ件数を管理する仕事をしているのですが、 上司から費用やチラシを設置するスタッフの人件費などが 前年にくらべかかっていて売上が下がったので改善を求められています。 ぶっちゃけ、私は町でチラシを取って、無料体験を受けて会員になろうなんて思う人の方が珍しいと思ってます。 でも、逆に考えれば、自らチラシを取って体験を受ける人間=会員になる気がある　と思うんです。 それを契約に繋げられない営業マンのせいもかなりあるんじゃないかと思っているのですが、 これを上司に言ってもいいでしょうか？（営業が弱いのはこの上司の指導力が無いからという意味を含んでます） 私の様な営業のノウハウなど何も知らない人間が口出しすると、 上司に、なんだこいつって思われると思うんですが、全て私のせいの様に思われるのが腹立たしいんです。 私の考えは間違っているでしょうか？

私の以前の質問↓ http://qanda.rakuten.ne.jp/qa9245201.html が締め切られてしまったので、続きで質問いたします。 前回教えて頂いたVBA↓が、ほぼ完璧なのですが、 あと1歩のところが解決しないまま終わってしまいました。 Sub test() 　　Dim s As Variant 　　Dim t As Workbook 　　Dim x As Workbook 　　s = Application.GetOpenFilename("CSV Files (*.csv), *.csv", , , , False) 　　If s = False Then Exit Sub 　　Application.ScreenUpdating = False 　　Set x = Workbooks.Add 　　Set t = Workbooks.Open(s) 　　With t.Worksheets(1) 　　　　.Rows("1:1").Insert Shift:=xlDown 　　　　.Range("A1") = "dummy1" 　　　　.Range("A1").AutoFill Destination:=.Range("A1:S1"), Type:=xlFillDefault 　　　　.Range("A1").AutoFilter 　　　　.Range("A1").CurrentRegion.AutoFilter Field:=13, Criteria1:="=90", _ 　　　　　　Operator:=xlOr, Criteria2:="=95" 　　　　.Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Copy x.Worksheets(1).Range("A1") 　　　　Application.DisplayAlerts = False 　　　　.Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Delete 　　　　x.Worksheets(1).Rows(1).Delete 　　　　x.SaveAs t.Path & "\test" & Format(Now(), "yyyymmdd hhmmss") & ".xlsx" 　　　　x.Close 　　　　.Parent.Save 　　　　.Parent.Close 　　　　Application.DisplayAlerts = True 　　End With 　　Application.ScreenUpdating = True End Sub これだと、分割後の表A'のP列が「指数」になってしまい、数値が 崩れてしまいます。 詳しく言いますと（前回書いた内容そのままですが） VBA実行前の元表AのP列はJANコード（13桁の数字）で、 4.56223E+12 というような表示になっています。 が、VBAを実行した後の表A（「90」と「97」が除かれた物）は、P列が 4.56E+12 と短くなってしまいます。 良く見ると表示形式が「指数」になっていて、これを「標準」に変更しても 正しくなりません。 （でも、表BのP列は「4.56223E+12」と正常です） せっかく95％完成しているVBAを教えて頂いたので、何とかならないものか？ と思っています。 どなたかお知恵をお貸し頂ければ幸いです。 ※忙しい業務の隙を見つけて投稿しておりますので、お返事頂いても 　即検証→報告が出来ないことがあります。 　 時間が空いても必ず結果報告はいたしますので、何とぞご了承下さい。

現状はパソコンとプリンターはUSBケーブルで繋いで使用しています 買い替えたプリンター「ブラザーDCP-J952N」前面にWiFiと表示されています パソコンはWiFi無線LANルーターを通してLANケーブルでインターネット接続をしています 何らかの設定により、パソコンからプリンターを無線操作ができるのでしょうか

写真乗っけたり、できるやつ知りませんか？ (インスタとTwitter意外で) お願いします🙇

年賀状を作成しています。例えば湾曲に”今年もよろしくお願いします”などのような文字列を配置配置したいのです。word２０１０が使えます。よろしくお願いします。

皆様、おはようございます。 関西の会社から内定を頂いたのですが、勤務がシフト制で4勤１休制です。 今思えば休みが少ないなと思うのですが、どうなんでしょうか・・ 会社自体は良さそうでした。

お世話になります。Range("C3")からLastRowまで生年月日が入りRange(”D3")からLastRowまで氏名が入っています。ここから来年成人式を迎える方のデータを新規ブックに抜出したいのですが何方かご教示お願いします

こんにちは。 いつもお世話になっております。 エクセルで相談があるのですが、 A～Eまで項目があるデータを並べ替えというか、表示を 変えたいのですが、どのようにしたらいいのかわからずお知恵を お借り出来たら幸いです。 A　　B　　　C　　　D　　E　　 No.　名前　　金額　担当　内容 1　田仲商店　300　鈴木　みかん ・ ・ というようなデータが1万件ほどあります。 No.は連番なので重複しません 名前は重複があります。最大20件でした 担当も重複があります。 内容も重複があります。 やりたいことは、別のシートに B列の名前ごとに金額をまとめたい。 かつ、内容（と出来れば金額も）を全てわかるようにしたい。 出来上がりイメージ 名前　　　合計金額　内容1　金額1　内容2　金額2　・・・・・ 田仲商店　1800　　　みかん　 300　りんご 　200　いちご 800　きうい 500 山田店　　1000　　　いちご　1000 または 名前　　　合計金額　内容1　　内容2　・・・・ 田仲商店　1800　　　みかん　りんご　いちご　きうい 　　　　　　　　　　　300　　200　　　800　　500 山田店　　1000　　　いちご 　　　　　　　　　　　1000　 という感じです。 SUMIFで金額の統合までは出来るのですが、それ以外の部分が 私の知識だとまったく届きません。 大変恐縮ですが、教えていただけると幸いです。 宜しくお願い致します。

こんにちは。 いつもお世話になっております。 エクセルで相談があるのですが、 A～Eまで項目があるデータを並べ替えというか、表示を 変えたいのですが、どのようにしたらいいのかわからずお知恵を お借り出来たら幸いです。 A　　B　　　C　　　D　　E　　 No.　名前　　金額　担当　内容 1　田仲商店　300　鈴木　みかん ・ ・ というようなデータが1万件ほどあります。 No.は連番なので重複しません 名前は重複があります。最大20件でした 担当も重複があります。 内容も重複があります。 やりたいことは、別のシートに B列の名前ごとに金額をまとめたい。 かつ、内容（と出来れば金額も）を全てわかるようにしたい。 出来上がりイメージ 名前　　　合計金額　内容1　金額1　内容2　金額2　・・・・・ 田仲商店　1800　　　みかん　 300　りんご 　200　いちご 800　きうい 500 山田店　　1000　　　いちご　1000 または 名前　　　合計金額　内容1　　内容2　・・・・ 田仲商店　1800　　　みかん　りんご　いちご　きうい 　　　　　　　　　　　300　　200　　　800　　500 山田店　　1000　　　いちご 　　　　　　　　　　　1000　 という感じです。 SUMIFで金額の統合までは出来るのですが、それ以外の部分が 私の知識だとまったく届きません。 大変恐縮ですが、教えていただけると幸いです。 宜しくお願い致します。

いつもお世話になっております。 下記の形式でデータを保管しておりますが、複数条件検索関数が全く思いつかず 質問をさせて頂きます。 やりたい事は、下記の「データシート」の【打刻（退社）】に時刻を入れたいです。 ⦿下記は「回答シート」 タイムスタンプ 　/ 氏名（フルネーム）/ 出退勤 / 出退勤時間 / 理由 / 日付 / ID 2016/11/22 8:57:25 　/ 　　山田 / 出勤 / 9:30:00 /0 / 2016/11/22 / 100003 2016/11/22 12:34:59 　/ 佐藤 /出勤 / 9:00:00 /0 / 2016/11/22 / 100004 2016/11/22 18:57:25 　/ 　　山田 / 退勤 / 9:30:00 /0 / 2016/11/22 / 100003 2016/11/22 22:34:59 　/ 佐藤 / 退勤 / 9:00:00 /0 / 2016/11/22 / 100004 ★上記の様にデータが自動で取得されて来ます。（右手の２つ。日付、IDは関数で作っています） ⦿下記は「データシート」 打刻ＩＤ / 日付 / 社員ＩＤ / 区分 / 打刻（出勤） / 打刻（退社） 42696100003 / 2016/11/22 / 100003 / 出勤 / 9:30 / 7：00 ←ここ 42696100004 / 2016/11/22 / 100004 / 出勤 / 9:00 / 7：00　　　　←ここ 上記の「打刻（退社）」を取得したいのですが、自分で考えた検索値と値の取得は 以下の様な形かと考えております。 １．データシートの「社員ID＋日付」が回答シートの「社員ID＋日付」で検索して ２．一致した場合、出退勤列の「退勤」だった場合、「打刻（退社）」に時間を入れる。 VBAで出来ない環境なので、関数でどうやって解決するかが思い付かず質問させて 頂きます。 何卒、宜しくお願い致します。

こんにちは。 いつもお世話になっております。 エクセルで相談があるのですが、 A～Eまで項目があるデータを並べ替えというか、表示を 変えたいのですが、どのようにしたらいいのかわからずお知恵を お借り出来たら幸いです。 A　　B　　　C　　　D　　E　　 No.　名前　　金額　担当　内容 1　田仲商店　300　鈴木　みかん ・ ・ というようなデータが1万件ほどあります。 No.は連番なので重複しません 名前は重複があります。最大20件でした 担当も重複があります。 内容も重複があります。 やりたいことは、別のシートに B列の名前ごとに金額をまとめたい。 かつ、内容（と出来れば金額も）を全てわかるようにしたい。 出来上がりイメージ 名前　　　合計金額　内容1　金額1　内容2　金額2　・・・・・ 田仲商店　1800　　　みかん　 300　りんご 　200　いちご 800　きうい 500 山田店　　1000　　　いちご　1000 または 名前　　　合計金額　内容1　　内容2　・・・・ 田仲商店　1800　　　みかん　りんご　いちご　きうい 　　　　　　　　　　　300　　200　　　800　　500 山田店　　1000　　　いちご 　　　　　　　　　　　1000　 という感じです。 SUMIFで金額の統合までは出来るのですが、それ以外の部分が 私の知識だとまったく届きません。 大変恐縮ですが、教えていただけると幸いです。 宜しくお願い致します。

現在勉強中で星座の判定のプログラムなんですが、consoleに表示させようといていて表示されません。 function seiza(){ if(((mon===3)&&(day>=21))||((mon===4)&&(day<=19))){ return "牡羊座"; }else if(((mon===4)&&(day>=20))||((mon===5)&&(day<=20))){ return "牡牛座"; }else if(((mon===5)&&(day>=21))||((mon===6)&&(day<=21))){ return "双子座"; }else if(((mon===6)&&(day>=22))||((mon===7)&&(day<=22))){ return "蟹座"; }else if(((mon===7)&&(day>=23))||((mon===8)&&(day<=22))){ return "獅子座"; }else if(((mon===8)&&(day>=23))||((mon===9)&&(day<=22))){ return "天秤座"; }else if(((mon===10)&&(day>=24))||((mon===11)&&(day<=22))){ return "蠍座"; }else if(((mon===11)&&(day>=23))||((mon===12)&&(day<=21))){ return "射手座"; }else if(((mon===12)&&(day>=22))||((mon===1)&&(bd<=day))){ return "山羊座"; }else if(((mon===1)&&(day>=21))||((mon===2)&&(day<=18))){ return "水瓶座"; }else if(((mon===2)&&(day>=19))||((mon===3)&&(day<=20))){ return "魚座"; 　　　　　　 }else{ return"error"; }　 monとdayは事前にpromptで入力させていて関数で呼び出し、どの数字にしても最後のerrorしか表示されません このif文は間違っているのでしょうか？またどのようにしたらいいのでしょうか？ 前後の文は省略しています。

現在勉強中で星座の判定のプログラムなんですが、consoleに表示させようといていて表示されません。 function seiza(){ if(((mon===3)&&(day>=21))||((mon===4)&&(day<=19))){ return "牡羊座"; }else if(((mon===4)&&(day>=20))||((mon===5)&&(day<=20))){ return "牡牛座"; }else if(((mon===5)&&(day>=21))||((mon===6)&&(day<=21))){ return "双子座"; }else if(((mon===6)&&(day>=22))||((mon===7)&&(day<=22))){ return "蟹座"; }else if(((mon===7)&&(day>=23))||((mon===8)&&(day<=22))){ return "獅子座"; }else if(((mon===8)&&(day>=23))||((mon===9)&&(day<=22))){ return "天秤座"; }else if(((mon===10)&&(day>=24))||((mon===11)&&(day<=22))){ return "蠍座"; }else if(((mon===11)&&(day>=23))||((mon===12)&&(day<=21))){ return "射手座"; }else if(((mon===12)&&(day>=22))||((mon===1)&&(bd<=day))){ return "山羊座"; }else if(((mon===1)&&(day>=21))||((mon===2)&&(day<=18))){ return "水瓶座"; }else if(((mon===2)&&(day>=19))||((mon===3)&&(day<=20))){ return "魚座"; 　　　　　　 }else{ return"error"; }　 monとdayは事前にpromptで入力させていて関数で呼び出し、どの数字にしても最後のerrorしか表示されません このif文は間違っているのでしょうか？またどのようにしたらいいのでしょうか？ 前後の文は省略しています。

現在勉強中で星座の判定のプログラムなんですが、consoleに表示させようといていて表示されません。 function seiza(){ if(((mon===3)&&(day>=21))||((mon===4)&&(day<=19))){ return "牡羊座"; }else if(((mon===4)&&(day>=20))||((mon===5)&&(day<=20))){ return "牡牛座"; }else if(((mon===5)&&(day>=21))||((mon===6)&&(day<=21))){ return "双子座"; }else if(((mon===6)&&(day>=22))||((mon===7)&&(day<=22))){ return "蟹座"; }else if(((mon===7)&&(day>=23))||((mon===8)&&(day<=22))){ return "獅子座"; }else if(((mon===8)&&(day>=23))||((mon===9)&&(day<=22))){ return "天秤座"; }else if(((mon===10)&&(day>=24))||((mon===11)&&(day<=22))){ return "蠍座"; }else if(((mon===11)&&(day>=23))||((mon===12)&&(day<=21))){ return "射手座"; }else if(((mon===12)&&(day>=22))||((mon===1)&&(bd<=day))){ return "山羊座"; }else if(((mon===1)&&(day>=21))||((mon===2)&&(day<=18))){ return "水瓶座"; }else if(((mon===2)&&(day>=19))||((mon===3)&&(day<=20))){ return "魚座"; 　　　　　　 }else{ return"error"; }　 monとdayは事前にpromptで入力させていて関数で呼び出し、どの数字にしても最後のerrorしか表示されません このif文は間違っているのでしょうか？またどのようにしたらいいのでしょうか？ 前後の文は省略しています。

VBA初心者です。 VBAで進むボタン1つを作成し、このボタンに下記の処理をさせます。 sheets("シート名").range("b1")=range("b1")+1 今の所、こちらはうまく処理されます。 しかし、違うシートにこの進むボタン2つ目を作成し、同じ処理をさせた場合、2つ目進むボタンだけうまく処理されません。 ※1つ目の進むボタンはうまく処理されます。 1つ目、2つ目の進むボタンを処理させるにはどうしたらいいでしょうか。 ちなみにそれぞれ別のシートに15個ほど進むボタンを作成したいです。 よろしくお願いいたします。

現在勉強中で星座の判定のプログラムなんですが、consoleに表示させようといていて表示されません。 function seiza(){ if(((mon===3)&&(day>=21))||((mon===4)&&(day<=19))){ return "牡羊座"; }else if(((mon===4)&&(day>=20))||((mon===5)&&(day<=20))){ return "牡牛座"; }else if(((mon===5)&&(day>=21))||((mon===6)&&(day<=21))){ return "双子座"; }else if(((mon===6)&&(day>=22))||((mon===7)&&(day<=22))){ return "蟹座"; }else if(((mon===7)&&(day>=23))||((mon===8)&&(day<=22))){ return "獅子座"; }else if(((mon===8)&&(day>=23))||((mon===9)&&(day<=22))){ return "天秤座"; }else if(((mon===10)&&(day>=24))||((mon===11)&&(day<=22))){ return "蠍座"; }else if(((mon===11)&&(day>=23))||((mon===12)&&(day<=21))){ return "射手座"; }else if(((mon===12)&&(day>=22))||((mon===1)&&(bd<=day))){ return "山羊座"; }else if(((mon===1)&&(day>=21))||((mon===2)&&(day<=18))){ return "水瓶座"; }else if(((mon===2)&&(day>=19))||((mon===3)&&(day<=20))){ return "魚座"; 　　　　　　 }else{ return"error"; }　 monとdayは事前にpromptで入力させていて関数で呼び出し、どの数字にしても最後のerrorしか表示されません このif文は間違っているのでしょうか？またどのようにしたらいいのでしょうか？ 前後の文は省略しています。

perlでサブルーチンに配列を渡しているのですが、 引数としている配列が１個の場合は問題ないのですが、 複数渡すと、第2引数以降が渡りません。 どの様にすれば上手くできますか。 例1 #!/usr/bin/perl @x1 = (14, 11, 5, 12, 8, 15); @x2 = (12, 10, 8, 9); print "main : @x1 \n"; &test(@x1); sub test { my (@arg1) = @_; print "sub : @arg1 \n"; } 結果 main : 14 11 5 12 8 15 sub : 14 11 5 12 8 15 例2 #!/usr/bin/perl @x1 = (14, 11, 5, 12, 8, 15); @x2 = (12, 10, 8, 9); print "main : @x1 \n"; print "main : @x2 \n"; &test(@x1, @x2); sub test { my (@arg1, @arg2) = @_; print "sub : @arg1 \n"; print "sub : @arg2 \n"; } 結果 main : 14 11 5 12 8 15 main : 12 10 8 9 sub : 14 11 5 12 8 15 12 10 8 9 sub : 引数1に全てが設定されて、引数2に設定されていない。

VBA初心者です。 VBAで進むボタン1つを作成し、このボタンに下記の処理をさせます。 sheets("シート名").range("b1")=range("b1")+1 今の所、こちらはうまく処理されます。 しかし、違うシートにこの進むボタン2つ目を作成し、同じ処理をさせた場合、2つ目進むボタンだけうまく処理されません。 ※1つ目の進むボタンはうまく処理されます。 1つ目、2つ目の進むボタンを処理させるにはどうしたらいいでしょうか。 ちなみにそれぞれ別のシートに15個ほど進むボタンを作成したいです。 よろしくお願いいたします。

ExcelのVBAなどでInputBoxで入力待ちの状態に対して、例えばVBSなどの別のプログラムから 、その入力待ちの欄に値を入力することができますか？ できるのであれば、どのようなコードになるのでしょうか？ VBSやPowerShellなど、無料のものでお願いします。

ExcelのVBAなどでInputBoxで入力待ちの状態に対して、例えばVBSなどの別のプログラムから 、その入力待ちの欄に値を入力することができますか？ できるのであれば、どのようなコードになるのでしょうか？ VBSやPowerShellなど、無料のものでお願いします。