お力をおかし頂けると助かります!
ネット上のデータをエクセルにコピーし、別のシートにある情報の中から同じものを探すために、ctrl+Fで検索機能を使用したいです。
検索内容な、名前で全てローマ字で入力されています。
ネット上のデータをエクセルに貼り付ける時は、「貼付け先の書式」にしています。
一件何の問題もなくコピペ出来ている様なのですが、名前のセルをコピーして「検索と置換」に入力するとなぜかその前後に””が出現します。
セルを選択した時に上に出てくるバー(すみません、初心者なもので呼び方が分からないのですが)には文字のみが出現し、””は表示されず、削除できるスペースも有りません。

拙い文章で申し訳ありませんが、どうか助けてください!
何か、足りない情報があれば教えて頂けるとうれしいです。

A 回答 (2件)

ネットから貼り付けたデータにはセル上では表示されない文字コードなどがくっついてくることがあります。



CLEAN関数をかませるという方法もありますし、検索と置換ダイアログに貼り付けたときの空白部分をドラッグでコピーし、その部分だけを検索する文字列に貼り付け、置換する文字列に何もいれずに全て置換にするとその文字コード部分を置換でなくすことができます。
    • good
    • 0

> 名前のセルをコピーして…


セル全体ではなく、セル内の必要な部分のみコピーしてください。

####
「ネット上のデータを貼り付けたエクセル」を*.csvで保存して、
それをテキストファイルで開いてみて下さい。
「""」が見えるかもしれません。
    • good
    • 0

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

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

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

Qexelのbookまたがりでセルをコピー貼付けたい

エクセル2010のvbaで質問です。

シンプルなデータ表から、印刷向きレイアウトにした別BOOKにセル内容を
送りたいのですが、うまくいきません。

開いてあるbookまたがりでセル値のコピーをします。送り側は連結セルです。
行、列を可変として順次ループで回すので、RANGEでなくCELLS(行、列)の指定で行いますが、
実行時エラーが出ます。(インデックスが有効範囲にありません)

Sheets(OUTSHEET).Cells(行,列).Value = Sheets(INSHEET).Cells(行,列).Value

↑現在この書き方でエラーになります。うまくいく方法はないのでしょうか。


なお、手動でコピーして、送り側セルでエンター押すとできます。
でもそのマクロ記録ではセル番地指定なので、自動化にできません。
詳しい方、よろしくお願いします。

Aベストアンサー

Sub テスト()
Dim INSHEET As String
Dim OUTSHEET As String
Dim 行 As Long '又は Integer
Dim 列 As Long '又は Integer
INSHEET = "Sheet1"
OUTSHEET = "Sheet2"
For 行 = 1 To 5
  For 列 = 1 To 3
    Sheets(OUTSHEET).Cells(行, 列).Value = Sheets(INSHEET).Cells(行, 列).Value
  Next 列
Next 行
End Sub


このようなコードでインデックスが有効範囲外というエラーがでるとすれば
 Sheets(OUTSHEET)
 Sheets(INSHEET)
のシートが見つからない場合が考えられます。

変数「OUTSHEET」、「INSHEET」に設定してあるシート名に誤りがないか確認してください。


またブックを跨ぐとありますが、上記コードでは同一ブックのシートを跨ぐ書き方になります。
別ブックを指定する場合は以下のようにしてください。


Sub テスト()
Dim INSHEET As String
Dim OUTSHEET As String
Dim INBOOK As String
Dim OUTBOOK As String
Dim 行 As Long '又は Integer
Dim 列 As Long '又は Integer
INBOOK = ThisWorkbook.Name ' = "ブック名" のように指定も可能
INSHEET = "Sheet1"
OUTBOOK = "Book1"
OUTSHEET = "Sheet2"

For 行 = 1 To 5
  For 列 = 1 To 3
    Workbooks(OUTBOOK).Sheets(OUTSHEET).Cells(行, 列).Value = Workbooks(INBOOK).Sheets(INSHEET).Cells(行, 列).Value
  Next 列
Next 行
End Sub

Sub テスト()
Dim INSHEET As String
Dim OUTSHEET As String
Dim 行 As Long '又は Integer
Dim 列 As Long '又は Integer
INSHEET = "Sheet1"
OUTSHEET = "Sheet2"
For 行 = 1 To 5
  For 列 = 1 To 3
    Sheets(OUTSHEET).Cells(行, 列).Value = Sheets(INSHEET).Cells(行, 列).Value
  Next 列
Next 行
End Sub


このようなコードでインデックスが有効範囲外というエラーがでるとすれば
 Sheets(OUTSHEET)
 Sheets(INSHEET)
のシートが見つからない場合が考えられます。

変数「OUTSHEET」、「INS...続きを読む

Q1つのセルをコピーすると、コピー先のセルが自動的に2セル結合された状態になる

1つのセル内容(とても短い単語、後ろのブランクなどもない状態)を隣のセルにコピーする際、「貼り付け」すると、なぜか、クリックしたセルだけでなく、その下のセルと2つのセルが結合されてしまい、ここに「貼り付け」されてしまいます。
貼り付ける前のセルは、「文字の制御」はすべてブランクです。

もし、原因や回避方法をご存じのかたがいらっしゃいましたらご指導下さい。

Aベストアンサー

コピー元のセルが連結してありませんか、
不必要な連結なら解除し、
必要なら入力画面からコピーします。

QEXCEL97で、結合セルをコピー、値貼付けはできないのでしょうか

EXCEL97を使用しています。

結合セルと結合していないセルが共に含まれた範囲を指定してコピーし、別のセルに『形式を選択して貼付け』の『貼付 値』を行った場合に「この範囲には同じ操作のセル結合が必要です」とのメッセージが出て、貼付けできません。

※ 上記の選択範囲の例
  A1とB1をセル結合した上、A1:B4を範囲指定(A2:B4は通常セル)

書式設定のボタンの『←a→』という形のものを使っているのですが、95の時はセル結合機能までが付与されてなかったので、問題なかったのですが、97になって困っています。

以下のようなアイデアはありますが、それ以外に良いものはあるでしょうか。
1.セル結合した部分とセル結合していない部分を2回に分けて行う
2.上記ボタンを使用せずに、セルの書式の横位置を『選択範囲内で中央』を選択

Aベストアンサー

マクロを作ってみました。(同一シート内で作ってしまいました。変更は楽でしょう)結合セルを含む範囲とコピー先左上単一セルを選択(コントロールキーを使って)して実行します。
選択状態のチェック等は省いています。マクロの手順はコメントを見てください。
普通にコピーして値に変えています。ショートカットキーを割り当てると楽かもしれません。ご参考に。

↓以下を標準モジュールに貼り付けます。
'========================================================
'結合セルを含む範囲を値複写する
' 結合セルを含む範囲とコピー先左上セルを選択して実行
'  ※複写先の範囲に結合セルがあれば解除する
'========================================================
Public Sub mergeCellsValue_copy()
  Dim rg As Range 'セル(ワーク)
  Dim rgCopy As Range 'コピー元セル範囲
  Dim rgPaste As Range 'コピー先左上セル

  'どちらがコピー元か決める
  For Each rg In Selection.Areas
    If rg.Cells.Count = 1 Then
      Set rgPaste = rg
    Else
      Set rgCopy = rg
    End If
  Next

  'コピー先範囲が結合されていれば解除する
  rgCopy.Offset(rgPaste.Row - 1, rgPaste.Column - 1).Select
  Selection.MergeCells = False

  '通常のコピーを実行
  rgCopy.Copy: rgPaste.Select: ActiveSheet.Paste
  
  'コピー先範囲を選択範囲にする
  rgCopy.Offset(rgPaste.Row - 1, rgPaste.Column - 1).Select

  'コピー先範囲の各セルを値にする
  For Each rg In Selection
    rg = rg.Value
  Next
End Sub

マクロを作ってみました。(同一シート内で作ってしまいました。変更は楽でしょう)結合セルを含む範囲とコピー先左上単一セルを選択(コントロールキーを使って)して実行します。
選択状態のチェック等は省いています。マクロの手順はコメントを見てください。
普通にコピーして値に変えています。ショートカットキーを割り当てると楽かもしれません。ご参考に。

↓以下を標準モジュールに貼り付けます。
'========================================================
'結合セルを含む範囲を値複写する
' 結...続きを読む

Qエクセルの図をワードへコピー:セル枠が出現:消す方法がありますか?

エクセルで、テキストボックスからの文字、オートシェイプからの図・線も入った
図を作りました。

その図をワードへコピーさせようとしています。

ペイントに一旦移してから、ワードへコピーさせますが、エクセルのセル枠が薄くですが残ってプリントされます。
(同様に、ワード作業中に、エクセルワークシートの挿入をクリック、
ワード上でエクセル作業をしてもセルの枠がプリントされます)
(別な表現では、エクセルからその図をプリントすると、セル枠は消えています)

ワード上でも、セル枠を消したいのですが、その方法がありますか?
あれば、どのようにするのかを教えて下さい。

よろしく、お願いします。
WindowsXPです。

Aベストアンサー

ペイントを経由してWordへ移行する意図がわからないのですが・・・
恐らくペイントを使わず、直接Excel→Wordへ貼り付ければグリッド線はコピーされないと思います。

(Excel上で)図をすべて選択→コピー→(Word上で)編集→形式を選択して貼り付け→MSOffice描画オブジェクトを選択→OK

たしかペイントはbmp形式です。bmpをWordに貼り付けると、まるで写真のようにまるごとコピーされます。つまりExcelのグリッド線までキッチリWordに貼り付けられてしまいます。
その他の形式(Office描画オブジェクトや拡張メタファイル等)であれば図等のオブジェクトだけをWordにもってくることができると思います。

Qセル間コピーの貼付けで、連続セル番地の逆向きの場合は?

おはようございます。
自己申告で、EXCEL操作ベテランのものです(笑)
通常、セル間コピーの貼付けは、コピー元のデータをコピーコマンドでコピーして該当の箇所に貼付けコマンドで貼付け、必要な範囲まで、ドラッグすると、一度に、多くのデータをコピー&ドラッグすることが可能です。
ところで、コピー元のデータと貼り付ける場所が逆向きの場合は皆さんはどうされますでしょうか。
具体的に示すと、コピー元はA1、A2、A3、A4の順番にデータとして”あ””い””う””え”とあり、コピー先はB1、B2、B3、B4の順番にデータとして”え””う””い””あ”としたい場合、に、一度に処理する方法を教えてもらいたいのです。
蛇足ですが、コピー先のB1、B2、B3、B4の順番にデータとして”あ””い””う””え”の順番ならば、
コピー元のA1の”あ”をコピーコマンドでコピーして、コピー先のB1に”あ”をペイストコマンドで貼り付けて
ドラッグ、若しくはオートフィルコマンドで一発でいかせる方法で処理しています。

Aベストアンサー

逆向きに貼り付けつデーター量が多いときは、データーの横のセルに1~100とか順番に番号を付けて、セルの並び替えを実施してから、必要な箇所に貼り付けていますよ。


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

人気Q&Aランキング

おすすめ情報