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

excelでセルの交換が出来るでしょうか?例えば、
 A1…みかん
 A2…りんご
 A3…ぶどう
 A4…なし
 A5…メロン
があったとします。これでA1とA4を交換して、
 A1…なし
 A2…りんご
 A3…ぶどう
 A4…みかん
 A5…メロン
としたいのですがなにかいい方法はないでしょうか。
できるだけ簡単な方法がいいのですが…。

A 回答 (6件)

以前の質問に、こんなものがありました。


http://oshiete1.goo.ne.jp/kotaeru.php3?q=74186
    • good
    • 0

「Shift」キーを押しながら 入れ替えたいセルへドラッグします。


下記サイトで図入りで説明がありますのでご覧ください。

参考URL:http://hamachan4.exblog.jp/2621512/
    • good
    • 2

A1を選択し、右クリックで切り取りを選択



A4を選択し、右クリックで切り取ったセルの挿入

ではだめですか?
    • good
    • 0

「みかん」になっているところを「なし」と


「なし」の入っているところを「みかん」にしたいと言うことでしたら、
オートフィルタがいいでしょう。

1段目は挿入で空欄にして下さい。
次にA列を指定し、データ→フィルタ→オートフィルタ
にすると
A1に▼が出ますね。
▼を押下して「みかん」を選択します。
「みかん」だけが出ますのでそれを空欄にします。
同様に「なし」を選び、「みかん」に修正します。
ドラッグでだーっと出来ますね。
「みかん」を修正した後、再び空欄を選び「なし」に修正します。
これで入れ替わった訳です。
データ→フィルタ→オートフィルタ(解除)
をして確認して下さい。
    • good
    • 0

隣接する空列(例ではB列)に好きな順序で番号を振って、B列で並び替えれば良いのでは?



 A1…みかん B1 ・・・2
 A2…りんご B1 ・・・3
 A3…ぶどう B1 ・・・4
 A4…なし  B1 ・・・1
 A5…メロン B1 ・・・5
    • good
    • 0

力技ですが



A1とA4のセルをB1とB4にそれぞれ移動
B4セルをA1セルに、B1セルをA4セルに移動させる
数が少なければこれで十分ではないでしょうか。

数が多いのであれば、B列等に並べたい順の数字を振ってその列で並べ替え。
    • good
    • 0

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

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

このQ&Aを見た人が検索しているワード

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

Qエクセルのデータ入れ替え ?

エクセルの文字データーですが、同じシート内にある文字データを簡単に「入れ替える」方法がありましたら教えて下さい。
違うセルにある文字データを「入れ替える」という作業をしたいのです。

現在は、その操作を知らないので、
 最初に移動したいデータをどこかの空セルに移動、空いたところに移したいデータを移動 最初に移動したデータを後に空いたセルに再度移動しています。

入れ替えが多いもので簡単にしたいです・・・

Aベストアンサー

選択した2つのセルの値を交換するマクロを作ってみました。
***マクロの登録***
1.下のマクロをコピーして標準モジュールに貼り付けて下さい。
  (標準モジュールの挿入:ツール→マクロ→マクロ→編集でVBE画面に移動し、挿入→標準モジュール)
2.シートでツール→マクロ→マクロ→(Koukanを選択して)オプションで
  ショートカットキー(Qにしましょう)を入力してOK→マクロダイアログを閉じます。
  うまくいっていれば、Ctrl+Shift+Qキーでこのマクロが機能します。

***交換処理***
1.交換する2つのセルの選択方法です。
  まず1つ目のセルを選択しCtrlキーを押しながら2つ目のセルを選択して下さい。
  マクロ実行時、2つ選択していなかったらメッセージが出ます。
    (2つ以外はエラーです)
2.Ctrl+Shift+Qキーで2つのセルの値が交換されます。
3.何回でも繰り返せます。
    テスト用のシート等を作って試してください。楽になればいいですね。

Option Explicit

Public Sub Koukan()
Dim rg As Range '選択セルを調べるワーク変数
Dim rgChange(2) As Range '2つの選択セルを単独セルに分割
Dim rgCot As Long '選択セル数のカウンタ
For Each rg In Selection '選択セルを調べる
rgCot = rgCot + 1
If rgCot <= 2 Then
Set rgChange(rgCot) = rg
Else
Exit For '長大な範囲を選択していた場合の対応
End If
Next
If rgCot <> 2 Then '2個選択していなかったら中断
MsgBox "セルの選択方法が間違っています。中断します。"
Exit Sub
End If
'セル内容の交換
Dim rgWork(2) 'ワーク
rgWork(1) = rgChange(1)
rgWork(2) = rgChange(2)
Range(rgChange(1).Address) = rgWork(2)
Range(rgChange(2).Address) = rgWork(1)
End Sub

選択した2つのセルの値を交換するマクロを作ってみました。
***マクロの登録***
1.下のマクロをコピーして標準モジュールに貼り付けて下さい。
  (標準モジュールの挿入:ツール→マクロ→マクロ→編集でVBE画面に移動し、挿入→標準モジュール)
2.シートでツール→マクロ→マクロ→(Koukanを選択して)オプションで
  ショートカットキー(Qにしましょう)を入力してOK→マクロダイアログを閉じます。
  うまくいっていれば、Ctrl+Shift+Qキーでこのマクロが機能します。

***交換処理***
1.交換...続きを読む

Qエクセルでセルの入れ替え

エクセルでの質問です。
数式で、離れたセルを交換することは可能ですか?
席順表を作っているのですが、席が替わったときに、簡単に入れ替えたいのです。

Aベストアンサー

>例えば、A1と、D3の内容を入れ替える、ということをしたいのです。コピー、なんかではなくて、数式とか、1回で、できる方法が知りたいです。

ユーザー関数でも作ればできそうな気もしますが・・・
結局のところは、自動ではなく「意図的にあるセルの値と他のセルの値をを一定の法則なく交換する」ということになりますよね。

切り貼りした方が効率的なような気がしますが?

回答にならなくてすみません。

Q(エクセル)データの入れ替え

例えば、A1とB1のセルに入力したものをコピーor切り取り&ペーストを使わずに
ほぼ同時に入れ替えられるような方法はあるでしょうか?

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

Aベストアンサー

私の方法を申し上げます。
(1)B1セルを選択し、右クリック
(2)切り取り
(3)A1セルを選択し、右クリック
(4)切り取ったセルの挿入
これでA1とB1が入れ替わります。

Qエクセル 表を大きく、紙いっぱいに印刷したい

エクセルで表を作りました。
印刷プレビューで確認したところ
用紙に対して表が小さく見栄えがしません。

一つ一ついじればできると思いますが、
簡単に、
用紙いっぱいにフォントも大きくし、表も大きくし、
印刷するやり方はありますか。
教えてください。

Aベストアンサー

CtrlキーとPのキーを同時に押すと「印刷」ダイアログが呼び出せます。その状態でAltキーとWのキーを同時に押すと「印刷プレビュー」が表示されますので、印刷のイメージがつかめます(必ずしもプレビュー通りには印刷されませんが)
印刷プレビュー画面の上にある、設定のボタンを押してあげれば、余白を少なくしたり、拡大縮小印刷をパーセンテージを指定しておこなえたりします。いずれにせよ、プレビューで確認しながら拡大率を決めていけばいいと思います。なお、「拡大縮小印刷」のところに「次のページ数に合わせて印刷をする」というチェックをいれて横1×縦1にしてあげれば自動で拡大縮小印刷ができる場合がありますが、やってみればわかりますが、特に縮小印刷の場合小さくなりすぎたりする場合もあります。

QWord 文字を打つと直後の文字が消えていく

いつもお世話になっています。
Word2000を使っているものです。
ある文書を修正しているのですが,文章中に字を打ち込むと後ろの字が消えてしまいます。
分かりにくいですが,
「これを修正します。」
という文章の「これを」と「修正します。」の間に「これから」という単語を入れたときに,その場所にカーソルを合わせて「これから」と打つと,
「これをこれからす。」
となってしまいます。
他の文書では平気です。
何か解決する方法があれば教えて下さい。

Aベストアンサー

入力モードが「挿入」(普通の入力)から、「上書き」になってしまっているのだと思われます。
キーボードに[Insert]というキーがあると思いますので、1度押してみてください。

Qエクセルで打ち込んだ数字を自動で別シートに表示したい

エクセルでセルに打ち込んだ数字を自動で別シートに表示できる方法があれば、教えてください。

例えば、シート1のC1に5を打ち込んだら、シート2のD2にシート1で打ち込んだ5が自動で表示される。

また1列すべてを自動で表示させる場合、一つのセルの時と違いがありましたら教えてください。よろしくお願いします。

Aベストアンサー

こんばんは。
入力したセルの値を合計とかでなくて、
純粋に別のシートに自動的に表示したいのであれば、
以下の方法があります。

1.1つのセルだけの場合
例)シート1のC1に5を打ち込んだら、
  シート2のD2にシート1で打ち込んだ5が自動で表示される

⇒シート2のD2のセルをアクティブにして「=」を入力
 した後、シート1のC1をクリックする。
 そうするとD2のセルに「=Sheet1!C1」と表示され、値が自動的に
 表示されるようになります。

2.1列全てコピーしたい場合。
  コピー&リンク貼り付けを使うと便利です。

例)例)シート1のC1~C5に何かを入力したら、
  シート2のD2~D7にシート1で打ち込んだものが自動で表示される

  シート1にあるコピー元のセルを範囲選択して、
  シート2のD2の上で「右クリック」⇒「形式を選択して貼り付け」
  をクリックします。

  そして出てきた小さな画面の左下にある「リンク貼り付け」という
  ボタンをクリックすると完成です。
  試してみてください。。

  念のためにリンク貼り付けを図解しているURLを載せておきます。
  参考にしてみてくださいね。。
  http://www.geocities.jp/office_inoue/excel/eq21.htm

こんばんは。
入力したセルの値を合計とかでなくて、
純粋に別のシートに自動的に表示したいのであれば、
以下の方法があります。

1.1つのセルだけの場合
例)シート1のC1に5を打ち込んだら、
  シート2のD2にシート1で打ち込んだ5が自動で表示される

⇒シート2のD2のセルをアクティブにして「=」を入力
 した後、シート1のC1をクリックする。
 そうするとD2のセルに「=Sheet1!C1」と表示され、値が自動的に
 表示されるようになります。

2.1列全てコピーしたい場合。
  コ...続きを読む

Qエクセルの罫線が印刷されない

エクセル97を使ってますが、罫線で表を作ったのですが、
画面には表示されるのですが、プレビュー画面、実際の印刷では印刷されません。
(データは印刷されてます)
どなたか、対処の仕方ご存知ですか?

Aベストアンサー

こんにちは

 例えばA1:A5が印刷範囲とします。
 セルA6で上罫線を設定している場合は印刷されません。
 セルA5で下罫線を設定している場合は印刷されます。
 左右についても同様です。

 また、メニュー[ファイル]-[ページ設定]の[シート]タブで[簡易印刷]にチェックが入っていると、罫線は印刷されません。

参考URL:http://www2.odn.ne.jp/excel/

Qエクセルで複数のセル選択をした後、選択したセルの1つを選択解除したい

m(__)m早速ですが、質問をさせて戴きます。

セルA1を選択し、次にコントロールキーを押しながら、A3セル、同じくA5セルと合計3つのセルを選択しているとします。

この状態で、A3セルだけの選択を解除し、結果としてA1セルとA5セルのみが選択された状態にするにはどうすればいいでしょうか?

Aベストアンサー

A1、A3、A5を選択した状態から、

(1)Tab、またはShift+TabでA3を選択状態にします。
(2)Shift+↑を2回行います。(A1:A3、A5が選択状態に変わる。A3がアクティブ)
(3)Shift+Tabを2回行います。(A1:A3、A5が選択状態のまま。A1がアクティブに変わる)
(4)Shift+↑を2回行います。(A1、A5が選択状態に変わる。A1がアクティブ)

なお、『↑』は上方向へのカーソル移動キーです。


やっていることは、
  『選択を取り消したいセルまたはセル範囲』と
  『その1つ前のセルまたはセル範囲』をいっしょにして
  『選択を取り消したいセルまたはセル範囲』部分を縮小する
と表現すればいいでしょうか。

Qフォルダにパスワードをかける方法

Windows XP を使用しています。フォルダにパスワードをかけて、他に見えないようにしたいと思っております。何かいい方法は、ないでしょうか。

Aベストアンサー

はじめましてこんにちは。
簡易な方法ですので、意に沿った方法でないかもしれませんが参考にしていただければうれしいです。

Windows XPをお使いですので、新規にソフトをインストールすることなく、フォルダにパスワードをかけて、他に見えないようにできます。

1、フォルダをzipフォルダにする
2、zipフォルダ内のファイルにパスワードをかける。
3、そのzipフォルダを隠しファイルにする。


具体的に↓
◎zipフォルダにしてパスワードをかける

1、パスワードをかけたいフォルダ上で右クリックします。
2、「送る」→「圧縮(zip形式)フォルダ」を選択します。
3、zipフォルダが作成されます。
4、作成されたzipフォルダをクリックしてフォルダを開きます。フォルダが1つあるはずですが、手は触れないで下さい。そのウィンドウで「ファイル」→「パスワードの追加」をクリックします。
5、パスワードを設定するよう求められますので、パスワードにしたい文字を入力して「OK」をクリックします。
6、これで、フォルダ内のすべてのファイルにパスワードが追加されましたので、パスワードを入力しないとファイルは開けません。(フォルダにパスワードはかけられないのでファイル名はばれますが…)

◎隠しファイルにする。
1、さっき作成したzipフォルダ上で右クリックし「プロパティ」をクリックします。
2、「属性」のところの「隠しファイル」にチェックをいれ、「OK」をクリックします。
3、これで、フォルダが見えなくなったはずです。


このままでは自分でもファイルが見れないので、
1、どのフォルダでもいいので開きます。
2、「ツール」→「フォルダオプション」をクリック
3、「表示」タブをクリック
4、「詳細設定」という項目の中に、「ファイルとフォルダの表示」という項目があるので「すべてのファイルとフォルダの表示」にチェックを入れて「OK」をクリックします。
5、これで隠しファイル(さっきのzipフォルダも)表示されるはずです。

隠しファイルを表示したくない場合は、さっきの4、の項目で「隠しファイルを表示する」にチェックを入れると隠しファイルが消えます。


こんな回答でよろしいでしょうか?長々と申し訳ないですが。

はじめましてこんにちは。
簡易な方法ですので、意に沿った方法でないかもしれませんが参考にしていただければうれしいです。

Windows XPをお使いですので、新規にソフトをインストールすることなく、フォルダにパスワードをかけて、他に見えないようにできます。

1、フォルダをzipフォルダにする
2、zipフォルダ内のファイルにパスワードをかける。
3、そのzipフォルダを隠しファイルにする。


具体的に↓
◎zipフォルダにしてパスワードをかける

1、パスワードをかけたいフォルダ上で右クリ...続きを読む

QエクセルのIF関数で、文字が入力されていたならば~

エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。

=IF(A1="『どんな文字でも』","",+B1-C1)

A1セルに『どんな文字でも』入っていたならば、空白に。
文字が入っていなければB1セルからC1セルを引く、という状態です。

この『どんな文字でも』の部分に何を入れればいいのか教えてください。

またIF関数以外でも同様のことができれば構いません。

宜しくお願いします。

Aベストアンサー

=IF(ISTEXT(A1),"",B1-C1)

でどうでしょうか?


人気Q&Aランキング