nobu555 の回答履歴

エクセルの表の一行置きに色が付いています。 他の方が作った表の流用をしているので、解除の仕方が解りません。 パターンで色づけしているのではないので解除の仕方が解らないんです。 エクセルはあまり詳しくはないのでわかりやすい回答をお願いします。

時給１１００円のパートで１５分単位と休憩時間を時給に換算するのですがどういう関数を使えばいいかわかりません。 たとえば９時２分出勤（タイムカードを押す時間）１６時３分退社なら ９時１５分～１６時という勤務時間で計算します。 ０～１５分までに入ったら１５分始業 １５～３０分までは３０分始業 ３０分～４５分までは４５分始業 ４５分～０分までなら００分始業という感じです。 ＭＩＮＵＴＥとＩＦでするのかなとか漠然と考えているのですが、どういう関数を使えばいいかわかりません。 タイムカードの時間と休憩時間を入力すると自動的に１日何時間勤務で月給いくらと出る表を作成したいのです。

Excelでオートシェイプの円を使わずに囲い文字を使いたいのです。 退職した社員が作成した表に↓のようなセルがあり 数字を入れるとちゃんと囲い文字が出てきます。 ※()は○の代わりです (消) 　44,556 書式 - セル - 表示形式 - ユーザ定義に 以下のように入っているので出来ると思うのですが (消) 　#,##0 ↑ 肝心のこの部分の入力のしかたがわかりません。 ※()は○の代わりです ワードで囲い文字をコピーして貼り付けてみたりしたのですが ○消となってしまいうまくいきませんでした。 向かいのパソコンでも自分のパソコンでもコピーすると使えます。 消の他に、誤・課　なども囲い文字として設定されています。 どなたかご存知の方、いらっしゃいましたら教えていただけないでしょうか。

Excelでオートシェイプの円を使わずに囲い文字を使いたいのです。 退職した社員が作成した表に↓のようなセルがあり 数字を入れるとちゃんと囲い文字が出てきます。 ※()は○の代わりです (消) 　44,556 書式 - セル - 表示形式 - ユーザ定義に 以下のように入っているので出来ると思うのですが (消) 　#,##0 ↑ 肝心のこの部分の入力のしかたがわかりません。 ※()は○の代わりです ワードで囲い文字をコピーして貼り付けてみたりしたのですが ○消となってしまいうまくいきませんでした。 向かいのパソコンでも自分のパソコンでもコピーすると使えます。 消の他に、誤・課　なども囲い文字として設定されています。 どなたかご存知の方、いらっしゃいましたら教えていただけないでしょうか。

時給１１００円のパートで１５分単位と休憩時間を時給に換算するのですがどういう関数を使えばいいかわかりません。 たとえば９時２分出勤（タイムカードを押す時間）１６時３分退社なら ９時１５分～１６時という勤務時間で計算します。 ０～１５分までに入ったら１５分始業 １５～３０分までは３０分始業 ３０分～４５分までは４５分始業 ４５分～０分までなら００分始業という感じです。 ＭＩＮＵＴＥとＩＦでするのかなとか漠然と考えているのですが、どういう関数を使えばいいかわかりません。 タイムカードの時間と休憩時間を入力すると自動的に１日何時間勤務で月給いくらと出る表を作成したいのです。

『Excel セルをクリックして、すでに登録されているリストが表示される。そのリストから一つ選択するとその項目がセルに入力される。（例：セルを選択すると、セルの右に飲み物のリストが表示され、その中から一つ選択すると、セルに選択した項目が入力される）』このようなシートを一度みたことがあり、使用したいと考えのたのですがその設定方法がわからず困っています。よろしくお願い致します。

C3に検索値が入力されます。 H3には =IF($C3="","",VLOOKUP($C3,INDIRECT("06!$H$2:$K$10000"),2,FALSE)) と入力した所、＃N/Aとなってしまいました。 06はシート名です。H列～K列までにデータが入力されており、 現在のシートのC3に検索値を入力すると、06のから値をかえすようにしたいと考えています。 お力を貸してください。お願いします。 分りにくい場合は言ってください。

ペーバー出力後にPDF変換後の図面と、実際のCAD図面とを判別できる手段を探しています。 データ変換時に図面領域の隅に「PDF」と印字させる方法、ソフト等があったりするのでしょうか？ プリンター側のヘッダーフッダーで設定する方法もありですが、 データで相手に渡した場合に、どこで出力されても判別できる方法を探しています。 変換ツールはAutocadの出力デバイス「DWGtoPDF」を使用しています。 ご存知の方おられましたら、教えて下さい。 よろしくお願いします。

教えてください。 マクロを組み込んだエクセルがあります。社員に公開して利用してますが、 マクロを実行させるボタンがいくつかあり、例えば、他部署はマクロボタンは照会ボタンのみ有効で算出ボタンとかは押したら、パスワードみたいなものが表示されパスワードを入力したとき実行される方法を考えてますが、 この方法をマクロでは可能でしょうか？ どうか　よろしくお願いします。

エクセルでデータを管理しています。 データがある、一番最後の行までしかスクロールしないようにしたいです。 つまり、データがない行は削除したいということですが、空っぽにするだけではなくて、行そのものを消すといったらいいのでしょうか…。 シフト+コントロール+エンドキーで全選択して行を削除しても、おそらくその下にあったであろう行が追加されて意味がなくなってしまいます。 何か方法があればよろしくお願いします。 一応、検索してみたのですが、同じような質問があったらすみません。

お世話になります。 Excelの行の削除の仕方でお聞きします。 あるリストが何百行とあるのですが、このうち 奇数行だけ削除したい場合に一気にできる やり方ってありますか？ 宜しくお願いします。

お世話になっております。エクセル数式について質問です。 元リストが入力してあるシート 　　A　　B　　C　D　E　F　G　H I J K L M N O P Q R １　番号　名称・・・・・・・・・・その他・・・・・・・・・・・ ２ ３ ４　23　　のり・・・・・・ ５　25　　はさみ・・・・・・ このようなデータが、2000行あります。 この中から、下記のようにＪの列の「用途」という文字だけを別シートにレイアウトで抽出をしたいのです。 （抽出は、Ａ4～Ｑ4、Ａ2000～Ｑ2000） 抽出先リスト 番号　名称　・・・・・・・その他・・・・ １　　のり・・・・・・・・用途・・・・ ３　　はさみ・・・・・・・用途・・・・ ※元リストは今後増える予定。 ※リストが増えた際の、再抽出はできるだけ自動でやりたい。 ※マクロは極力使いたくないです。 ご教授下さい。 よろしくお願いします。

仕事の都合で、JISコードを調べなければならなくなったのですが、 調査対象がいっぱいあって困っています。 excel（に限りませんが、excelが使い慣れているので）の関数などで、 文字コードを返してくれる関数などってありますか？ CODE関数を試してみたのですが（=CODE(山)）、循環参照というエラーが出てしまって困っています。 できれば複数の文字（1行単位など）が一度に文字コード変換ができればいいのですが、無理なら1文字ごとでもいいので探しています。 教えてください。

題名の通りです。 Solidworksを勉強しています。 わかりにくい質問かもしれませんが、例えばサーフェスオフセットなどを使用して、元の面（Aとします）から○○mm離れた位置に元の形状と同じ面（Bとします）を作成し、ロフトで面Aと面Bをつないでふさぎ、その面全体をソリッド化するコマンドはあるのでしょうか？

今、エクセルでグラフを作っています。 今までは普通に表示されていたグラフが昨日、処理途中で全部黒く表示されて見えなくなってしまいました。グラフを一つずつクリックすると、クリックしたグラフだけ普通に見ることができます。 こうなってしまったのは一つのファイルだけのようです。 どうすれば今までのようにグラフを普通に表示できるのでしょうか？

こんにちは。 エクセルに関する質問です。 既に誰かが開いているエクセルファイルを開くとロックがかかってしまい読み取り専用になってしまいます。 これを他者の人が読み取り専用でなく最初に開いた人と同じように編集可能でしょうか。 もし可能であれば設定方法を教えて下さい。

エクセルの印刷マクロを作りましたが、動作が非常に遅いのです。 スタッフ用と管理者用のマクロを作り、スタッフ用が遅いのです。 余計なものが含まれているのでしょうか？ お願いします。 Sub スタッフ() ' スタッフ Macro 　　ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$55" With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$55" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0) .RightMargin = Application.InchesToPoints(0) .TopMargin = Application.InchesToPoints(0) .BottomMargin = Application.InchesToPoints(0) .HeaderMargin = Application.InchesToPoints(0) .FooterMargin = Application.InchesToPoints(0) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .CenterHorizontally = True .CenterVertically = True .Orientation = xlLandscape .Draft = False .PaperSize = xlPaperA4 .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 76 .PrintErrors = xlPrintErrorsDisplayed End With ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$60" With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$60" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0) .RightMargin = Application.InchesToPoints(0) .TopMargin = Application.InchesToPoints(0) .BottomMargin = Application.InchesToPoints(0) .HeaderMargin = Application.InchesToPoints(0) .FooterMargin = Application.InchesToPoints(0) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .CenterHorizontally = True .CenterVertically = True .Orientation = xlLandscape .Draft = False .PaperSize = xlPaperA4 .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 70 .PrintErrors = xlPrintErrorsDisplayed End With Range("A1").Select End Sub

エクセルの印刷マクロを作りましたが、動作が非常に遅いのです。 スタッフ用と管理者用のマクロを作り、スタッフ用が遅いのです。 余計なものが含まれているのでしょうか？ お願いします。 Sub スタッフ() ' スタッフ Macro 　　ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$55" With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$55" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0) .RightMargin = Application.InchesToPoints(0) .TopMargin = Application.InchesToPoints(0) .BottomMargin = Application.InchesToPoints(0) .HeaderMargin = Application.InchesToPoints(0) .FooterMargin = Application.InchesToPoints(0) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .CenterHorizontally = True .CenterVertically = True .Orientation = xlLandscape .Draft = False .PaperSize = xlPaperA4 .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 76 .PrintErrors = xlPrintErrorsDisplayed End With ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$60" With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$60" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0) .RightMargin = Application.InchesToPoints(0) .TopMargin = Application.InchesToPoints(0) .BottomMargin = Application.InchesToPoints(0) .HeaderMargin = Application.InchesToPoints(0) .FooterMargin = Application.InchesToPoints(0) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .CenterHorizontally = True .CenterVertically = True .Orientation = xlLandscape .Draft = False .PaperSize = xlPaperA4 .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 70 .PrintErrors = xlPrintErrorsDisplayed End With Range("A1").Select End Sub

オートフィルタで”空白”を絞りこむことはできますが、データが入力してあるものすべてを抽出するにはどうすればいいでしょうか？一定の値を検索し絞りこむのではなく、データが入っているものをしぼりたいのですが・・・分かりにくい質問ですみませんがどなたか教えて下さい。

エクセルの印刷マクロを作りましたが、動作が非常に遅いのです。 スタッフ用と管理者用のマクロを作り、スタッフ用が遅いのです。 余計なものが含まれているのでしょうか？ お願いします。 Sub スタッフ() ' スタッフ Macro 　　ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$55" With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$55" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0) .RightMargin = Application.InchesToPoints(0) .TopMargin = Application.InchesToPoints(0) .BottomMargin = Application.InchesToPoints(0) .HeaderMargin = Application.InchesToPoints(0) .FooterMargin = Application.InchesToPoints(0) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .CenterHorizontally = True .CenterVertically = True .Orientation = xlLandscape .Draft = False .PaperSize = xlPaperA4 .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 76 .PrintErrors = xlPrintErrorsDisplayed End With ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$60" With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "$A$1:$AJ$60" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0) .RightMargin = Application.InchesToPoints(0) .TopMargin = Application.InchesToPoints(0) .BottomMargin = Application.InchesToPoints(0) .HeaderMargin = Application.InchesToPoints(0) .FooterMargin = Application.InchesToPoints(0) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .CenterHorizontally = True .CenterVertically = True .Orientation = xlLandscape .Draft = False .PaperSize = xlPaperA4 .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 70 .PrintErrors = xlPrintErrorsDisplayed End With Range("A1").Select End Sub