1月1日, インターネット、PCと家電, ソフトウェア, Office系(Word、Excel)に関するQ&A
ホーム » インターネット、PCと家電 » ソフトウェア » Office系(Word、Excel)
-
インターネット、PCと家電 » ソフトウェア » Office系(Word、Excel)
エクセルのシート名を日付にしたいエクセルのシートを31枚にし...
2010/05/26 21:15:42
エクセルのシート名を日付にしたいエクセルのシートを31枚にして、各シート名を1月1日~1月30日にしたいのですが、どうやっていいのかわかりません…やはりマクロを使用しないとできないのでしょうか…ご回答よろしくお願いいたします。
-
インターネット、PCと家電 » ソフトウェア » Office系(Word、Excel)
エクセルのシート名を日付にしたいエクセルのシートを31枚にし...
2010/05/26 21:15:12
エクセルのシート名を日付にしたいエクセルのシートを31枚にして、各シート名を1月1日~1月30日にしたいのですが、どうやっていいのかわかりません…やはりマクロを使用しないとできないのでしょうか…ご回答よろしくお願いいたします。
-
インターネット、PCと家電 » ソフトウェア » Office系(Word、Excel)
EXCELにおける関数、自動で一気に同じ文字を追加させる方法...
2010/05/12 20:11:40
EXCELにおける関数、自動で一気に同じ文字を追加させる方法はありますでしょうか?EXCELで以下の通り、セルに情報がある時-----------15年1月1日-----------6年2月2日-----------8年3月3日-----------23年4月4日-----------48年5月5日-----------59年6月6日-----------先頭に、1年~10年の表記があるものの頭に、「平成」という文字を追加する。それ以外の(23年とか15年とか)表記の頭には、「昭和」という文字を追加する。という作業を、関数など使って一気におこなうことは出来ないでしょうか?----------- -----------6年2月2日 → 平成6年2月2日----------- ------------------------ -----------23年4月4日 → 昭和23年4月4日----------- --------------実際は5,000件以上あり、1件ずつ入力するのはかなり負担なのです。ご存知の方お教え下さい。
-
インターネット、PCと家電 » ソフトウェア » Office系(Word、Excel)
EXCELについて教えてくださいデータ入力するシートに、日付...
2010/05/07 09:42:14
EXCELについて教えてくださいデータ入力するシートに、日付と予定を入力すると、別のカレンダー風のシートに予定が反映されるものを作りたいのですが、どうすればいいでしょうか?データシート(sheet1)のA1に日付を入れたら,カレンダー(sheet2)の予定表に色が入るといった感じにしたいのですが。sheet1 _____A___________B 1 1月1日←←←←←←入力2 1月2日 3 sheet2 ____A_____________B____C 1 1_____________2 ____32 ● ___________●←←←反映3
-
インターネット、PCと家電 » ソフトウェア » Office系(Word、Excel)
エクセルVBAのコンボボックスに関する質問です。...
2010/05/03 22:36:27
エクセルVBAのコンボボックスに関する質問です。コンボボックスのリストには2種類の文字列が表示されるのですが、選択するとコンボボックスには先頭の文字列しか表示されません。コンボボックスで日付と行事名の一覧がリストに出るようにして、その中から任意の行事を選択して、コンボボックスに表示させるようにしたいと考えています。現在、コンボボックスのリストを表示すると 2010年1月1日 元旦 2010年1月14日 誕生日 2010年2月14日 バレンタインデーと表示されますが、例えば「2010年1月1日 元旦」を選択すると、コンボボックスの表示欄には 2010年1月1日とだけ表示され、「元旦」は表示されません。どうしたら両方が表示されるのでしょうか?どなたか教えて頂けないでしょうか。現在、記入しているソースは以下のとおりです。Private Sub UserForm_Initialize() Dim lRow As Long Dim myData With Worksheets("行事情報Master") lRow = .Range("A" & Rows.Count).End(xlUp).Row myData = .Range("行事情報Master!B4:C" & lRow).Value End With With ComboBox1 .ColumnCount = 2 .ColumnWidths = "50;50" .List = myData End WithEnd Subどうぞ、よろしくお願いします。