親子におすすめの新型プラネタリウムとは?

Wordで、メモ帳から文章を移動したい

メモ帳にある文章をWordに貼り付けたら、一文字左にスペースができて、すべて段落マークがついてしまうのですが、改行にしてスペースをなくすにはどうしたらいいでしょうか?メモ帳のに書いた文章の見た目をできればそのままWordに移動したいです。

A 回答 (2件)

メモ帳ってことは書式なしテキストなので、メモ帳内の改行 (CRLF) は Word では改段落 (CRLF) になってしまいますね。


Excel のセル内改行 (LF) は Word に貼り付けた際に改行 (LF) としてそのまま解釈されるようです。
コピー元が Windows 環境で作成された書式なしテキストだと無理かもしれませんね。

改行コードを LF として文書を作成できるテキスト エディタからペーストしたらどうなるんだ、とか気になりますが環境が手元にないので試せません。
    • good
    • 0

> 改行にしてスペースをなくす


この意味が不明です。
  
メモ帳のメニューバー、書式で「右端で折り返す」にチェックが入っていませんか?
このチェックを外して、全選択→コピー→Wordで貼り付ければ、すべての行に段落マークが付く事はありません。
   
> 一文字左にスペースができて
ルーラーで設定して下さい。
https://www.becoolusers.com/word/indent.html
   
見た目のままWordに移すのであれば、現状でいいのではないかと思います。
行頭の1文字の件は上記で修正できるでしょう。  
  
今見つけましたが、多分あなたの疑問は、以下のページで解消するにでは?
http://cblog.crie.jp/word/183/
    • good
    • 0

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

このQ&Aを見た人はこんなQ&Aも見ています

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

Qエクセル リストと完全一致するセルに色をつける

シート1のA列とB列に
aaa ccc
bbb ggg
ccc kkk
ddd ooo
と言うリストがあって、A1〜A4はAチーム、B1〜B4まではBチームと名前を付けています
シート2にAチームのリスト4個が続いているものがあればセルを赤、Bチームのリスト4個が続いているものがあればセルを黄色に塗りたいです
AチームとBチームの中には同じ品番がある時もあります
条件付き書式で設定は出来るでしょうか?

Aベストアンサー

(´・ω・`)
”○” の数を数えるんじゃないんだよなあ。

・・・本題・・・

条件付き書式ですよね。

シート2のリストの並び順は
 aaa
 ccc
 bbb
 ddd
では「Aチーム」と認識しないという事でよろしいでしょうか?
ならば、とても簡単です。

シート2の一覧において、

 判定するセル1
 判定するセル2
 判定するセル3
 色を付けるセル
 判定するセル4
 判定するセル5
 判定するセル6

という範囲について調べれば良いという事。

 判定するセル1
 判定するセル2
 判定するセル3
 色を付けるセル

 判定するセル2
 判定するセル3
 色を付けるセル
 判定するセル4

 判定するセル3
 色を付けるセル
 判定するセル4
 判定するセル5

 色を付けるセル
 判定するセル4
 判定するセル5
 判定するセル6

の4パターンについてそれぞれ調べれば良いだけ。

自分なら
 aaa-bbb-ccc-ddd
のようにシート1から文字列を作り、それが調べるセルで同じパターンになるかを調べます。
シート1はA5セルから、シート2はA11セルからデータが入力されているなら、

 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A11 & A12 & A13 & A14
 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A12 & A13 & A14 & A15
 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A13 & A14 & A15 & A16
 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A14 & A15 & A16 & A17

という条件になる。
この4つのうちの一つでも条件を満たせばセルに赤色を付ければいい。
「Bチーム」についても同様にすればいいので、
この場合、8つの条件式を設定することになります。

面倒でもこの考え方ができていないと、ちょっと条件が変わっただけで対処できずに終わります。
冒頭で「並び順」について書きましたが、並び順がシート1のリストの通りでなくとも色を付けたい場合でも、この考え方は必要ということです。

・・・
ちなみに厄介なのが、どちらのチームにも「ccc」がいるというところかな。
これが無ければ違う方法でシンプルにできるんですけどねえ。

(´・ω・`)
”○” の数を数えるんじゃないんだよなあ。

・・・本題・・・

条件付き書式ですよね。

シート2のリストの並び順は
 aaa
 ccc
 bbb
 ddd
では「Aチーム」と認識しないという事でよろしいでしょうか?
ならば、とても簡単です。

シート2の一覧において、

 判定するセル1
 判定するセル2
 判定するセル3
 色を付けるセル
 判定するセル4
 判定するセル5
 判定するセル6

という範囲について調べれば良いという事。

 判定するセル1
 判定するセル2
 判定するセル3
 色を付け...続きを読む

Qwordについて

文字を打っていく際一番右まで来ると次は1つ下の行の一番左から始まるのが普通だと思うのですが、文書を書いている途中である行以降でそれが成り立たなくなりました。
具体的には
あああああああああああああああああああああああ
あああああああああああああああああ
あああああああああああああああ。
と言った具合です。
一度改行するとまた左から始まるのですが、一番右までくると上のようにおかしくなります。
説明が上手く伝わってないかもしれないですが、どうすれば元に戻るのかご存知の方いましたら教えてください。

Aベストアンサー

[ぶら下げインデント]の状態だと思うのですが、日本語の場合では
左側に[ぶら下げインデント]が設定されるので、[言語]として文字
方向が[右から左]に書くアラビア語が設定されているのでは。

この場合、段落]ダイアログで[方向]を[右から左]を指定すると、
[ぶら下げインデント]の動作が質問にあるような状態になります。
[ぶら下げインデント]を解除するか、[方向]を[左から右]で指定を
してください。

QWordについて質問です。 文末脚注の表示がおかしくなります。どうすれば改善できるでしょうか。 具体

Wordについて質問です。
文末脚注の表示がおかしくなります。どうすれば改善できるでしょうか。
具体的にいうと、文末脚注の境界線の後に1ページ分不要な空白が入ってしまいます。写真にある通りです。バックスペースやデリートを押しても消えません。この不要な空白のページを消すためにはどうすれば良いでしょうか。
取り急ぎ文書を作成しなければならないので、困っています。どなたか教えていただけると非常に助かります。どうぞよろしくお願いします。

Aベストアンサー

文末脚注の境界線のあるページに入力できないということですか?

左ページが本来の文末になるはずですよね。
ところが、次ページに送られて[文末脚注の継続時の境界線]の下に
入力されたということですよね。

通常の設定なら、そのようなことは起きないと思います。
新規文書で文末脚注のあるものを作成してみて、同じになるか確認
します。
新規文書では問題がない場合、作成中の文書がおかしくなっている
と思われるので、ファイルの修復などをします。
https://support.microsoft.com/ja-jp/help/918429/how-to-troubleshoot-damaged-documents-in-word

QExcel 2013 邪魔臭いクイック分析アイコン、要らない!

添付図は、式 =10+ROW() を入力したセル A1 を下方向2行にオートフィルした結果を示しています。
ちょっと見え辛いかも、セル A3 の右下に豆腐に何やら落書きしたような怪しいアイコンが纏わり付いています。
私にはこの邪魔臭いヤツが表示されないようにする方法を教えてください。

因みに、当該アイコンにマウスを重ねると、下記の惹句が表示されます。
> クイック分析ツールを使用して、グラ
> フ、カラーコード、数式といった Excel
> の便利なツールにより、データをすばや
> く簡単に分析します。

Aベストアンサー

オートフィルオプション(貼り付けオプション)ですね。
以下の手順で消せます。確認済みです。
添付図参照です。こちらのバージョンは古いですが設定項目はほぼ同じと思います。

◆手順
1.メニュー → ファイル → オプション とします。
2.左側の詳細設定 をクリックして、『切り取り、コピー、貼り付け』のところの『「貼り付けオプション」ボタンを表示する』のチェックをはずします。※添付図の赤破線部です
3.OK をクリックします。

Q一定の行間の削除

エクセルで ある列 A列に下の方に 文字が入ってゐて 並んでいて 例えば 表という文字が
A1に入ってゐて、A2に表の内容が○○、A3にも△△、・・・・という具合で並んでいて、A5に裏
という文字が入ってきて、その裏内容がA6 ××、××、A7 ◇◇と並んでいて  さらに下ってゆくと例えばA9にまた表という文字が入ってきてA10にその内容の□□、A11◆◆・・とならんでいてしかしまたA15に裏という文字がでてきて、その裏の内容をA16、A17....という具合に下にならんで繰り返していった場合、裏という行を含めた裏の内容の行を一気に消す VBAはどう書けばいいのでしょうか。つまりは裏の内容を一気に消し、表の内容だけにしたいということです。ご教授ください。

Aベストアンサー

こんにちは!

表のレイアウトがよく判らないのですが・・・
単にA列が「裏」の行を削除ではなく、↓の画像のような場合
黄色のセルの行を削除したい!というコトでしょうか?

そういうコトだとしての一例です。

Sub Samle1()
 Dim i As Long, myRng As Range, myFlg As Boolean
  For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
   If Cells(i, "A") = "裏" Then
    myFlg = True
   ElseIf Cells(i, "A") = "表" Then
    myFlg = False
   End If
   If myFlg = True Then
    If myRng Is Nothing Then
     Set myRng = Cells(i, "A")
    Else
     Set myRng = Union(myRng, Cells(i, "A"))
    End If
   End If
  Next i
   If Not myRng Is Nothing Then
    myRng.EntireRow.Delete
    MsgBox "完了"
   Else
    MsgBox "該当データなし"
   End If
End Sub

こんな感じではどうでしょうか?m(_ _)m

こんにちは!

表のレイアウトがよく判らないのですが・・・
単にA列が「裏」の行を削除ではなく、↓の画像のような場合
黄色のセルの行を削除したい!というコトでしょうか?

そういうコトだとしての一例です。

Sub Samle1()
 Dim i As Long, myRng As Range, myFlg As Boolean
  For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
   If Cells(i, "A") = "裏" Then
    myFlg = True
   ElseIf Cells(i, "A") = "表" Then
    myFlg = False
   End If
   If myFlg = True Then
  ...続きを読む

Q交差するセルの入力方法について

sheet1
A     B     C     D
日付   名前    事由
1    はさん   休み
4    いさん   早退

sheet2
A     B     C     D     E...    AF
日付    1      2     3      4...    31
いさん                    早退  
ろさん
はさん   休み

---------------------

シフト表を作成しており、提出された届出をsheet1に入力し、
sheet2に反映させるようにし、反映後にsheet1のD列に”済”と
入力できればと思っています。
また、次に入力した場合は”済”の次から反映できるように
できればと思っていますが、マクロの組み方が分かりません。

よろしくお願いいたします。

Aベストアンサー

No.2の回答者です。
>"失敗しました"と出てしまいます(><)

ふつうは、正しく設定している限りは、このエラーが出てくることはめったにないのですが、ただ、
最初に使おうとしたりするときにオブジェクトが収まっていないと、そのようなエラーが出るようです。こちらで新しくシートから作り直してみましたが、こちらも1回だけ不明なエラーが発生しました。
一応確認だけさせていただきます。
最初に、エラーの時の対処の仕方を書いておきます。
(1)
> Set sh1 = Worksheets("Sheet1")
> Set sh2 = Worksheets("Sheet2")  ←こちら側の名称は正しいですか?

(2)

25行目付近にある
j = .Cells(i, 1).Value
これは、確認のためで不要ですから、削除してください。

(3)
34行目付近にある、このコードですが、
' If Err() <> 0 Then
' MsgBox "失敗しました", vbExclamation
' Exit Sub
' End If

(文字の先頭に、シングルコーテーション「'」で、マクロを使わないようにする)
これは、予定していないエラーのためでしたが、なくても作動するはずでず。

次に、デバッグ・ツールの使い方を念のために書かせていただきます。
(解決すれば、使わなくても結構です)

以下の左端の枠をワンクリックして「●」をつけます。(通常茶色の丸)
●  If .Cells(i, dt + 1).Value = "" Then '日付が2列目を1日とした場合 dt +1【修正】
そして同じようにマクロを実行させます。
その部分に来るとマクロが止まります。、次に、F8 を押すと、ステップモードに切り替わりますので、1行ずつエラーがないのか探します。

それは、ローカルウィンドウを、画面下に出して、変数が正しく返っているか、0になったりしていないか、エラーが出たところを見つけるわけです。

●は、メニューのデバッグで、「すべてのブレークポイント削除」を選択していただけると早いです。

なお、マクロとワークブックはアドインというスタイルで、分離させることも可能です。

No.2の回答者です。
>"失敗しました"と出てしまいます(><)

ふつうは、正しく設定している限りは、このエラーが出てくることはめったにないのですが、ただ、
最初に使おうとしたりするときにオブジェクトが収まっていないと、そのようなエラーが出るようです。こちらで新しくシートから作り直してみましたが、こちらも1回だけ不明なエラーが発生しました。
一応確認だけさせていただきます。
最初に、エラーの時の対処の仕方を書いておきます。
(1)
> Set sh1 = Worksheets("Sheet1")
> Set sh2 = Worksheet...続きを読む

Qエクセル関数

式の中の参照部分を、D1のセルの内容によって変えたいです。
下記が実際の式なのですが
=IFERROR(IF(VLOOKUP(I6,[工場在庫.xlsm]A!$D$3:$D$1000,1,FALSE)=I6,"OK","新規追加!!"),"新規追加!!")

この式の [工場在庫.xlsm]A! の部分をD1のセルから持ってくるにはどうしたらいいかがわかりません。
D1のセルが[工場在庫.xlsm]B!だったら
=IFERROR(IF(VLOOKUP(I6,[工場在庫.xlsm]B!$D$3:$D$1000,1,FALSE)=I6,"OK","新規追加!!"),"新規追加!!")
としたいです。
ご教授お願いいたします。

Aベストアンサー

こんにちは

簡単にやるなら、INDIRECT関数を利用して参照範囲を可変にすればよさそう。

[工場在庫.xlsm]A!$D$3:$D$1000
  ↓ ↓
INDIRECT(D1 & "$D$3:$D$1000")

ただし、INDIRECT関数等は揮発性関数と言われる種類ですので、他の方の質問でこのような(↓)ものもありますのでご注意。
https://oshiete.goo.ne.jp/qa/10893054.html

QWordを使って印刷すると文字の下が切れてしまいます

Wordを使って印刷すると以下のように文字の下が切れてしまいます。
解決策をご存知の方がいらっしゃれば、回答をお願いします。
MicrosoftWord2013を使用しています。
https://teratail-v2.storage.googleapis.com/uploads/contributed_images/d09546408f7b8fbeea51fe5eb2ccdf70.png

ファイルを以下に添付しました。
https://free.filesend.to/filedn_infoindex?rp=92b949e791d74e5944f4f8736c6767ao

Aベストアンサー

こちら↓と同じ状況ですね。
https://answers.microsoft.com/ja-jp/msoffice/forum/msoffice_word-mso_win10-mso_2016/ud%E3%83%87%E3%82%B8%E3%82%BF%E3%83%AB%E6%95%99/1eb8d4da-8ef1-40bd-8db8-2ff8f3f3708b

Wordから直接プリンターに送った場合に、何の影響なのかは判断が
できませんが、下線よりも下側に飛び出る部分が欠けてしまうよう
です。

PDFなどの別のファイル形式にすると問題なく表示されるので、
直接プリンターへ送らないでPDFファイルなどにしたものを印刷
してはいかが。

ちなみにプリンター側の[プレビュー]の段階で、上記の方法による
違いがでています。受け取った情報に何らかの問題があるよです。

Qエクセルで関数を用いて表を作成したいです。

スポーツ評価をした結果を自動で表示されるものを作成したいと思っています。
評価内容は、モビリティ:①ASLR ②ショルダーモビリティ
モーターコントロール:③ロータリースタビリティ ④トランクスタビリティ
ファンクショナルパターン⑤インラインランジ ⑥ハードルステップ ⑦ディープスクワット
各①〜⑦の結果は、最適・合格・不合格

結果をもとに優先順位1位 2位 3位 4位を決めたいです。優先順位の仕方としては、一つ目は不合格である事がまず一つ。二つ目は、ファンクショナルパターンよりも、モーターコントロールよりも、モビリティを優先させる。3つ目は、①から⑦を上から順番に選択。

例え①不合格、②合格、③合格、④不合格、⑤合格、⑥合格、⑦合格
優先順位1位① 2位④ 3位② 4位③

関数を用いて可能だと思うのですが、わからないのでお願い致します。

Aベストアンサー

No.1です。

>順位まで出すことが出来たのですが、一位~4位に表示された①~④を文字で表す事は可能ですか?
>例えばb3が①→ダンベルという表示で、順位で一位の表示される時にダンベルと出したいのですが…

No.1の例でしめすと、
H3セルを『=B3』に修正して、下方向にコピペです。
B列を表示したい文字列に修正したら完成です。

Qエクセルのワークシートに、文字を入れるとエラーになります。

ワードに、エクセルのワークシートを埋め込みました。
そのワークシートに、文字を入れるとエラーになります。
(数字は問題ないようです)
以前作った、文字を入れたワークシートを開いた場合もエラーになります。
これはファイルが壊れてしまったのでしょうか?

Aベストアンサー

具体的に、エラーになるケースとエラーにならないケースを記載して頂くと、
回答者の方は回答がやり易いと思いますよ。
>(数字は問題ないようです)
>これはファイルが壊れてしまったのでしょうか?
数字に問題はなく、他がえらーからして、ファイルが壊れたとは考えにくいのですが。

ご参考まで。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング