advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 295 for cell filename (0.001 sec.)
cell (1170), filename (1981)
[[20040818112453]]
#score: 11170
@digest: 550543210804f648853f013da5bd22da
@id: 8285
@mdate: 2004-08-18T04:58:07Z
@size: 1355
@type: text/plain
#keywords: 上ヘ (7815), ス]& (7005), フッ (4432), 示機 (4362), ロサ (3387), ッタ (3254), leftfooter (3128), ガト (2709), ル↓ (2458), ー/ (1695), 度設 (1664), beforeprint (1615), 様上 (1564), ス] (1563), 名] (1287), mypath (1225), パス (1182), アリ (1046), ス表 (990), kamiya (884), pagesetup (842), リガ (746), ヘッ (664), filename (637), ッダ (598), ・-- (575), トウ (562), ター (552), cell (469), サン (438), てフ (421), 構文 (415)
『フッターについて』(aug)
EXCEL2002にある機能でフッターに表示させることが出来る「&[パス]&[ファイル名]」を2000でも使うことは出来ないでしょうか? 同じように入力するとファイル名は表示されるのですが、[パス]はそのままパスと表示されてしまうのです。 そのファイルがどこに保存されているのかがわかればいいのですが・・・ ---- XL2000では仕様上ヘッダー/フッターにパス表示機能がないので、 自動で行うにはVBAでパスの取得をしてフッターに文字列として 都度設定をするか、適当なセルに=CELL("filename")として フッターの代わりにするか。 マクロサンプル↓ Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim MyPath As String MyPath = ThisWorkbook.Path With ActiveSheet.PageSetup .LeftFooter = MyPath & "¥&F" End With End Sub (KAMIYA) ----- KAMIYAさん、返答ありがとうございます。 マクロを使ったことがないので、マクロの方もご教授いただければ嬉しいです。 KAMIYAさんのサンプルをコピーして貼り付けてみたのですが、実行しようとした時に End Subが必要です。というエラーが出てしまったのです。 お願いします。 ---- 何度もすみません。 マクロではなく=CELL("filename")の方で解決することが出来ました。 アリガトウございました。 ---- 解決されたようですが、念のために・・・ 貼り付けたときに、End Sub が抜けているのではありませんか? 構文の最後に追加してみてください。 (川野鮎太郎) ...
http://www.excel.studio-kazu.jp/wiki/kazuwiki/200408/20040818112453.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97013 documents and 608132 words.

訪問者:カウンタValid HTML 4.01 Transitional