旅先で恋に落ちたくなる?思わぬ運命の恋に巡り合う映画

エクセルのシートを 別立ち上げのエクセルにコピーしたが、そのうち長い"html文"入ったセルの最初の数十文字までしか 入ってなかった。1000文字ぐらいは入っています。

元のエクセルシートは別のアプリケーションで使用中のものですが、実用では心配なため一旦コピーしたシートでエディットしてから実用にはめ込もうと考えましたが 完全にコピーできないため困っています。
何か 設定変更が必要でしょうか?

このQ&Aに関連する最新のQ&A

A 回答 (3件)

私の知っている限り、Excel2000以上のバージョンでコピー出来ています。



そのセルに入っている文字を補足欄に書き込んでみては?
文字自体に原因があるとは考え難いのですが。

この回答への補足

ある1列の各行に5000文字ぐらいのHTML文が 上から下まで規則正しく配列して有ります。EXCEL2000です。

補足日時:2004/04/26 06:53
    • good
    • 0

#1です。


シートを他ブックにコピーしたのであれば、シートの構成は
全く同じですよね。(入力されているデータが異なる可能性はありますが)

よって、コピー元のシート全て(Ctrl+A)を選択してコピーし、
コピー先のシートに貼り付ければOKです。
こうすれば、255文字超の部分もコピーされます。

この回答への補足

新しいブックのシートの一つに シート自体のコピーと シートの全範囲のコピーも しましたがやはり255文字しか入っていませんでしたので 一つのセルをコピーし、上書き貼り付け下のですが、結果は同じでした。

元のセルとコピー先のセルの中身は メモ帳にコピーして確かめましたので 確かだと思います。

補足日時:2004/04/12 07:18
    • good
    • 0

十数文字というのが謎ですが、半角255文字以上入ったセルを含む


シートを他ブックにコピーすると、255文字までしかコピーされず
尻切れトンボになります。
この場合は当該セルを上書きコピーする事で対処します。

違っていたら無視して下さい。
    • good
    • 0
この回答へのお礼

回答 有難うございました。
文字数は もっと多かったです。私の勘違いでした。
255文字 以上の コピーは出来ないでしょうか?

お礼日時:2004/04/11 16:16

このQ&Aに関連する人気のQ&A

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

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

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

Qエクセル プルダウンの作り方

お世話になります。
エクセルでプルダウンの作り方を教えていただけませんでしょうか?
住所を▼のボタンでクリックしたら【北海道,青森,秋田,岩手・・・】などの選択ができるようにしたいのです。
宜しくお願いします。

Aベストアンサー

メニューから「データ」、「入力規則」、「設定」で「入力値の種類」を「リスト」を選択します。
そうすると「元の値」という表示がでますので、そこで前もって作っておいたリストの範囲を指定します。
多くないのでしたら、そのままそこにカンマで区切って入力しても出来ます。

Qエクセルでマクロを使って別のシートのセルをコピーしたいのですがコピー先はマクロを実行した際のセルに指

エクセルでマクロを使って別のシートのセルをコピーしたいのですがコピー先はマクロを実行した際のセルに指定したいのですが、どうすれば出来ますか?
分かりやすく教えてください。

Aベストアンサー

このマクロは、経験のある人は少ないとは思いますが、プログラム的に言うと、マクロ*を一旦保留にするという意味ではないかと思います。作ってみたことはあります。
(*マクロの定義に反しますが。)

Sheet1 の A5 をマクロの起点として、Sheet2 なのか、Sheet3 なのか、どれかを選択して、範囲選択して、起点のセルをコピー&ペーストするという解釈です。

一見、Inputbox メソッドで使えるかと思ってやってみると、これがうまくいかないわけです。
ということで、UserForm をInputboxの代わりとして使うか、そんな所になるのではないかと思います。

ですが、文章を見る限りでは、マクロにお詳しくないわけで、そんな方に、実験的なマクロを提供しても、ゴミ同然になるかもしれません。

ショートカットは既存のもの以外なら、何でもよいと思います。
[現行では、Shift + Alt +c でコピー、Ctrl + Alt + v で ペースト]
何か指がつりそうな気がします。

これを、右クリックのマウスメニューに入れる方法もあります。

'//標準モジュール(本来は、個人用マクロブックに登録するのがよいのですが、
'//しかし、現行のマクロは、他のブックにはペースト出来ません。)

'Option Explicit 'モジュールの最上部から貼り付ける
Dim RngArea As String
Dim ShName As String
Dim WbName As String '現在は生きてはいない
Sub Auto_Open()
''ショートカット設定 '再起動で設定完了
Application.OnKey "%+c", "GetArea" 'Alt + Shift->c ''"%"..ALT,"+"..Shift, "^"..Ctrl
End Sub
Sub GetArea()
 If TypeName(Selection) = "Range" Then
  RngArea = Selection.Address(0, 0)
  ShName = Selection.Parent.Name
  WbName = Worksheets(ShName).Parent.Name
  Application.OnKey "^%v", "myPaste" 'Ctrl + Alt ->v
  Application.StatusBar = "..マクロ稼働中.."
  Beep
  
 End If
End Sub
Sub myPaste()
 Dim msgRet As VbMsgBoxResult
 If TypeName(Selection) <> "Range" Then Exit Sub
 If RngArea = "" Then Exit Sub
 msgRet = MsgBox("ここでよろしいですか?", vbInformation + vbYesNoCancel)
 If msgRet = vbYes Then
  Worksheets(ShName).Range(RngArea).Copy Selection
  If MsgBox("これでお終いですか?", vbInformation + vbYesNo + vbDefaultButton2) = vbYes Then
   GoTo EndLine
  End If
 ElseIf msgRet = vbCancel Then
  If MsgBox("範囲指定は消えます。", vbOKCancel) = vbOK Then
   GoTo EndLine
  End If
 End If
 Exit Sub
EndLine:
 Application.OnKey "^%v"  'キーの設定は消えます。
 Application.CutCopyMode = 0
 Application.StatusBar = False
 RngArea = ""
 ShName = ""
End Sub

範囲が決定した後の状態で、左下のステータスバーには、マクロ稼働中と出てきます。

このマクロは、経験のある人は少ないとは思いますが、プログラム的に言うと、マクロ*を一旦保留にするという意味ではないかと思います。作ってみたことはあります。
(*マクロの定義に反しますが。)

Sheet1 の A5 をマクロの起点として、Sheet2 なのか、Sheet3 なのか、どれかを選択して、範囲選択して、起点のセルをコピー&ペーストするという解釈です。

一見、Inputbox メソッドで使えるかと思ってやってみると、これがうまくいかないわけです。
ということで、UserForm をInputboxの代わりとして使うか、そ...続きを読む

Qエクセルで、3Dのドーナツグラフの作成方法を教えてください

 ある雑誌の中で、ドーナツ(真中に丸い空白)の3Dグラフを見ました。
 同じように、エクセル2002でドーナツの3Dグラフの作成をする事は可能でしょうか? もし可能であれば、作成方法を教えてください。
 どうぞ宜しくお願い致します。 

Aベストアンサー

ドーナツグラフの書式で「影つき」を選ぶと微妙に…(^^;

3D円グラフのように斜め上から見たような図だったのでしょうか?

Qエクセル2003で別のマクロで選択したセルに別のシートからコピーして貼り付けるマクロ

別のマクロで選択したセルに別のシートからコピーして貼り付けるマクロ、どうしても、このマクロが作れないです。
難題すぎて・・・・
貼り付けるセルの値は選択ボタンによって変わる仕様ですが、エクセル2003で可能なんでしょうか?
難しすぎてコードが全然解らない状態です
どなたかご教授願えれば幸いです。

Aベストアンサー

モジュールレベルで変数を宣言すればどうでしょうか。
マクロが同じモジュールにがあるなら
Dim rng As Range
マクロが別のモジュールにあるなら
Public rng As Range

Sub a()
Set rng = ActiveSheet.Range("A1")
End Sub

Sub b()
MsgBox rng.Value
Set rng = Nothing
End Sub

[XL] Visual Basic for Applications 変数の適用範囲
​http://support.microsoft.com/kb/141693/ja

Q(Excel)エクセルのバージョンごとの使用可能関数リストがあるサイト

(Excel)エクセルのバージョンごとの使用可能関数リストがあるサイト

Excel2007でIFERROR関数などを使っていました
しかし、以前のExcelバージョンだと使えないようです。
そこで、どの関数がどのExcelバージョンから使用可能か?
というリストのようなものを掲載しているサイトはありますか?

Aベストアンサー

下記ページで2007で追加された関数が解ります。

Excel(エクセル)基本講座:Excel(エクセル)関数一覧表
http://www.eurus.dti.ne.jp/~yoneyama/Excel/kansu/itiran.html

Qエクセルでシート1のセルに入力すると別シートのセルに表示させるには

依頼されて会員証をエクセル2003で作っている最中です。
SHEET1に下記の様に会員証のベースを作ました。

[●●●の会]
会員番号 [SHEET2の会員番号列]
住所 [SHEET2の住所列]
氏名 [SHEET2の氏名列]
電話番号 [SHEET2の電話番号列]
[管理社名]

SHEET2にまだ空欄ですが、会員番号・住所・氏名・電話番号のリスト表を作りました。

ここからが課題でして、SHEET2に会員番号、住所とセルに打ち込んでいくと

SHEET1のそれぞれに対応したセルに表示させる為に

SHEET1のセルに、[=Sheet2!A3]と打ち込めば、

SHEET2のA3のセルが対応されますが、

これではそのセルしか対応しません。

SHEET2の1行目に会員番号、住所から打ち込んだものは、

単純にSHEET1の表示させたいセルに[=SHEET2!○○]を打ち込めば、

それが対応されます。

ただSHEET2の2行目は空白ですので、新たに打ち込んで対応させようとしても出来ません。

毎度毎度SHEET1の表示させたセルに[=SHEET2!○○]をしていくのは大変です。

新規にリストを打ち込むたびにSHEET1の会員証に

表示させる方法はどういったものがあげられるのでしょうか?

或いは、SHEET1の会員証ベースに打ち込んでいくとSHEET2のリストに

自動的に登録される仕組みの方がやりやすいのでしょうか?

数式も教えていただければ大変有難いです。

アクセスの方がやりやすいかもしれませんが、

依頼した方のPCにはアクセスは入っていないですし、

私自身もアクセスはイマイチの部分があります。

エクセルのマクロなるものを使えません。

年始早々に使用したいとの事ですので、
なんとか仕上げてあげたいとは思います。
宜しくお願い致します。

依頼されて会員証をエクセル2003で作っている最中です。
SHEET1に下記の様に会員証のベースを作ました。

[●●●の会]
会員番号 [SHEET2の会員番号列]
住所 [SHEET2の住所列]
氏名 [SHEET2の氏名列]
電話番号 [SHEET2の電話番号列]
[管理社名]

SHEET2にまだ空欄ですが、会員番号・住所・氏名・電話番号のリスト表を作りました。

ここからが課題でして、SHEET2に会員番号、住所とセルに打ち込んでいくと

SHEET1のそれぞれに対応したセルに表示させる為に

SHEET1のセルに、[=Sheet2!A3]と...続きを読む

Aベストアンサー

>次のA3に会員番号00002として打ち込み、会員種類を法人、以下違う人の名前や電話番号などを打ち込んでも、SHEET1では会員番号が変わるだけで、他は1行の情報のままです。。。。。。

=IF(B2="","",ROW())
こちらの式はA2セル入力の後下方向にコピーしてください、Sheet2の会員番号は会員種類に入力があると自動的に表示されます、直接入力はしないでください。
表示形式を00002としたいのであれば、Sheet2のA列とSheet1の会員番号セルをセルの書式設定のユーザー定義で00000としてください。

て入力で00002と入力してその表示になっているので有ればそれは文字列として設定されていると思います、文字列の場合はSheet1の会員番号の呼び出しのMAX関数が働きません。


>OFFSETは基準の端から端までを考えなくても良いという事で、会員番号の最大値と最終行は等しいから、C2でも良いし、D2でも良いのでしょうか?
>OFFSETの行数設定で(A:A)ではおかしい事になるのでしょうか?

OFFSETで求めているのはVLOOKUP関数の検索範囲の右下のセル番地です
http://officetanaka.net/excel/function/function/offset.htm
OFFSETの図解説明のサイトです。

>次のA3に会員番号00002として打ち込み、会員種類を法人、以下違う人の名前や電話番号などを打ち込んでも、SHEET1では会員番号が変わるだけで、他は1行の情報のままです。。。。。。

=IF(B2="","",ROW())
こちらの式はA2セル入力の後下方向にコピーしてください、Sheet2の会員番号は会員種類に入力があると自動的に表示されます、直接入力はしないでください。
表示形式を00002としたいのであれば、Sheet2のA列とSheet1の会員番号セルをセルの書式設定のユーザー定義で00000としてください。

て入力で000...続きを読む

Qエクセル「VLOOKUP」の使い方

エクセル2000です

「名簿&住所録」シートを検索して、その人の電話番号を表示しようとしています。

例.
=VLOOKUP("山田 太郎",'名簿&住所録'!F:M,7,FALSE)


この"山田 太郎"の部分を、可変(セル「A1」や「A2」)に指定できないでしょうか?

例.
=VLOOKUP(A1,'名簿&住所録'!F:M,7,FALSE)

ヘルプを見ましたが分からなくて、、、

Aベストアンサー

A列に名前(山田 太郎)を入力
B列に =VLOOKUP(A1,名簿&住所録!$F:$M,7,FALSE) を設定してコピー

Qエクセルのセル1の指定のセルの数値を、別のシートのセルに追加記録していく方法

シート1のA1とA2に数値(任意)を入力します。

そして、シート1にあるボタン(決定ボタン的なものです。)を押すと、

シート2の
A1に”シート1のA1の数値”
A2に”シート1のA2の数値”

を記録し、シート1のA1とA2をクリアします。(数値を消去)

そして新たに、シート1のA1とA2に数値を入力し、
シート1のボタンを押すと

シート2のB1に”シート1のA1の数値”
シート2のB1に”シート1のA2の数値”

を記録といったように、横方向に自動で追加していきたいです。

 ※次はC1とC2です。

どなたかお分かりなられる方教えてください。
よろしくお願いします。

Aベストアンサー

時間の記録については、シート1のC4の欄に

=NOW()

と入力して、セルの書式設定で、表示形式を「時刻」の「13:30:55」等(質問者様のお好きな書式)に変えます。
その上で、先ほどのマクロの記述を下記のように書き換えます。

Sub Macro1()
Dim a1, a2
Dim time

Calculate
a1 = Range("C2").Value
a2 = Range("C3").Value
time = Range("C4")
Sheets("Sheet2").Select
Range("C5").Select
Do While ActiveCell <> ""
ActiveCell.Offset(0, 1).Range("A1").Select
Loop
ActiveCell = a1
ActiveCell.Offset(1, 0) = a2
ActiveCell.Offset(-1, 0) = time
Sheets("Sheet1").Select
Range("C2:C3").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("A1").Select
End Sub

先ほどの記述と変わった点がいくつかありますが、ひとつひとつについては説明しませんので、よく見てご確認ください。

これを実行すると、シート2のC4から右側にボタンを押した時刻が表示されますので、この部分のセル書式の表示設定も「時刻」の表示になるように変える必要があります。

時間の記録については、シート1のC4の欄に

=NOW()

と入力して、セルの書式設定で、表示形式を「時刻」の「13:30:55」等(質問者様のお好きな書式)に変えます。
その上で、先ほどのマクロの記述を下記のように書き換えます。

Sub Macro1()
Dim a1, a2
Dim time

Calculate
a1 = Range("C2").Value
a2 = Range("C3").Value
time = Range("C4")
Sheets("Sheet2").Select
Range("C5").Select
Do While ActiveCell <> ""
ActiveCell.Offset(0, 1).Range("A1").Select
Loop
ActiveCell = a1
Ac...続きを読む

Qエクセルのチェックボックスを整列させたい

こんにちは。

エクセルでチェックボックスをつかいました。
きれいに整列させる方法ってあるのでしょうか?
チェックボックスを複数選択できれば
どうにかなるかな?と思ったのですが
それすらできませんでした。

環境は下記の通りです。
OS:MacOS X
アプリ:EXCEL 2001

よろしくお願いします。

Aベストアンサー

こんばんは

当方、Windows環境ですので、Macで同じ操作ができるか解りませんが、そのあたりをふまえてご確認ください。

まず、コントロールツールボックスに限った事では内のですが、オブジェクトをクリックすると四隅と四辺の中央にマークが出ますよね。
これをドラッグする際に、Alt(Macにもありますか?)を押しながらドラッグすると、セルの線上に位置づける事が出来ますので、容易にオブジェクトのサイズや位置をそろえられると思います。

また、複数オブジェクトの選択ですが、ウィンドウの下の方にある図形描画のツールバーにマウスポインタのボタンがありますよね。
これをクリックすると、オブジェクトを選択しやすいマウスになります。
この状態で、複数のオブジェクトが含まれる様にドラッグする事で、ドラッグした四角の中に含まれるオブジェクトが複数選択されます。

Qエクセル リストで指定したセルを別シートで参照し、参照セルから指定セルを表示させる方法?

エクセルで自社式の伝票を作成しようと思っています。

シート1のA列2行目から下に向かって商品名リストが、
シート1の1行目B1から右に向かって事業所名が入り、いずれも増加していきます。
シート1のB2以降は商品単価が入り、事業所単位で単価の違うものを一覧化してあります。

シート1 【イメージ】
          B1     B2    B3
         事業所1  事業所2  事業所3
A2 商品イ    200円   空欄    空欄
A3 商品ロ    空欄    330円   空欄
A4 商品ハ    180円   空欄    170円

シート2のA列では事業所1・2・3がドロップダウンリスト表示されるようになっており、
シート2のB列で、A列でリスト表示した現業名に対応する商品リストだけをリスト表示させ、
更にはC列でその価格を表示したいのですがうまくいきません。

エクセル関数に強い方、どうか教えていただけませんか?

Aベストアンサー

●入力シートのA列一番下の事業所リストから、商品名を表示する
Sheet2!E1セルに
=IFERROR(INDEX(Sheet1!A:A,SMALL(IF(INDEX(Sheet1!B$2:D$20,,MATCH(LOOKUP("ーー",A:A),Sheet1!$B$1:$D$1,0))<>"",ROW(Sheet1!B$2:B$20)),ROW(A1))),"")
[Ctrl]+[Shift]+[Enter]で確定。配列数式、{}で囲まれる。
下へオートフィル

Sheet2!B列の入力規則のリスト
=OFFSET(E$1,,,COUNTIF(E:E,"?*"))


●G列以降(右)に商品名を表示する(計算が重くなり、非現実的)
Sheet2!G2セルに
=IFERROR(INDEX(Sheet1!$A:$A,SMALL(IF(INDEX(Sheet1!$B$2:$D$20,,MATCH($A2,Sheet1!$B$1:$D$1,0))<>"",ROW(Sheet1!$B$2:$B$20)),COLUMN(A2))),"")
[Ctrl]+[Shift]+[Enter]で確定。配列数式、{}で囲まれる。
右へ下へオートフィル

Sheet2!B列の入力規則のリスト
=OFFSET($G1,,,,COUNTIF($G1:$Z1,"?*"))

●共通
Sheet2!C2セル
=INDEX(Sheet1!$B$2:$D$4,MATCH($B2,Sheet1!$A$2:$A$4,0),MATCH($A2,Sheet1!$B$1:$D$1,0))

●入力シートのA列一番下の事業所リストから、商品名を表示する
Sheet2!E1セルに
=IFERROR(INDEX(Sheet1!A:A,SMALL(IF(INDEX(Sheet1!B$2:D$20,,MATCH(LOOKUP("ーー",A:A),Sheet1!$B$1:$D$1,0))<>"",ROW(Sheet1!B$2:B$20)),ROW(A1))),"")
[Ctrl]+[Shift]+[Enter]で確定。配列数式、{}で囲まれる。
下へオートフィル

Sheet2!B列の入力規則のリスト
=OFFSET(E$1,,,COUNTIF(E:E,"?*"))


●G列以降(右)に商品名を表示する(計算が重くなり、非現実的)
Sheet2!G2セルに
=IFERROR(INDEX(Sheet1!$A:$A,SMALL(IF(INDEX(Sheet...続きを読む


人気Q&Aランキング