Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

窗体中 如何通过按钮 直接调用表里的数据 赋值给excel单元格

over_fly111  发表于:2019-07-02 14:04:22  
复制

窗体中  如何通过按钮 调用表里的数据。

比如Me.是调用本窗体的数据,怎么调用表里的数据呢?我想赋值到EXCEL里

 

Top
仙来 发表于:2019-07-02 16:35:52
先找到表里数据,再导出到EXCEL表里

over_fly111 发表于:2019-07-03 11:20:08
您好 请问那个语句是?有例子吗?

西出阳关无故人 发表于:2019-07-03 13:49:36
dlookup等函数都可以。例如:文本框=dlookup("字段名","表或查询名","不带where的查询条件")

over_fly111 发表于:2019-07-04 11:20:20
语法:

    DLookup(expr, domain, [criteria])

参数解释:

    expr:要获取值的字段名称
    domain :要获取值的表或查询名称
    criteria:用于限制 DLookup 函数执行的数据范围。如果不给 criteria 提供值,Dlookup 函数将返回域中的一个随机值。

正常用法

    用于数值型条件值:
  DLookup("字段名称" , "表或查询名称" , "条件字段名 = n")

    用于字符串型条件值:(注意字符串的单引号不能丢失)
  DLookup("字段名称" , "表或查询名称" , "条件字段名 = '字符串值'")

    用于日期型条件值:(注意日期的#号不能丢失)
  DLookup("字段名称" , "表或查询名称" , "条件字段名 = #日期值#")

从窗体控件中引用条件值用法

    用于数值型条件值:
  DLookup("字段名称" , "表或查询名称" , "条件字段名 =" &
   forms!窗体名!控件名)

    用于字符串型条件值:(注意字符串的单引号不能丢失)
  DLookup("字段名称" , "表或查询名称" , "条件字段名 = '" &
   forms!窗体名!控件名 & "'")

    用于日期型条件值:(注意日期的#号不能丢失)
  DLookup("字段名称" , "表或查询名称" , "条件字段名 = #" &
   forms!窗体名!控件名 & "#")

混合使用方法(支持多条件)

    在这种方法中也可以在条件中写入固定的值。 
    DLookup("字段名称" , "表或查询名称" , "条件字段名1 = " & Forms!窗体名!控件名1  _
            & " AND 条件字段名2 = '" & Forms!窗体名!控件名2 & "'" _
            & " AND 条件字段名3 =#" & Forms!窗体名!控件名3 & "#")

注:
    Dlookup之类的合计函数(域函数)是ACCESS为用户提供的内置函数,通过这些函数可以方便的从一个表或查询中取得符合一定条件的值赋予变量或控件值,就不需要再用DAO或者ADO打开一个记录集,然后再去从中获取一个值,这样所写的代码要少的多。
    但是如果需要更灵活的设计,比如所查询的域没有在一个固定的表或查询里,而是一个动态的SQL语法,或是临时生成的复杂的SQL语句,亦或是需要代入循环的条件值等,此时还是需要从DAO或者ADO中定义记录集来获取值。因为Dlookup之类的合计函数必竟是一个预定义好格式的函数,所支持的语法有限,但对于大多数的要求是都能够满足的。


over_fly111 发表于:2019-07-04 11:21:49
ACCESS中DLookup使用
有两个表分别是:
窗口  字段名  字段名
计算 [今日日期] [今日净值]
净值  [日期]    [净值]
在计算窗口文本框中[今日净值]要引用净值表中的净值,(满足引用条件是计算中的[今日日期]等于净值[日期]那条记录)
请问正确的代码是什么??
= DLookup("净值", "净值", "日期='" & Me![今日日期] & "'")



over_fly111 发表于:2019-07-04 14:17:56

您好! 我试了一下,我有个表 【制造部担当】 字段有【电话】和【担当者】

然后我有个窗体,有制造部担当,我现在想当窗体制造部担当和表里担当者名字一致时候,

将电话导出到excel的B4里,,不知为啥不行呢》?

.Range("B4") = DLookup("电话", "制造部担当", "担当者='" & Me.制造部担当 & "'")




西出阳关无故人 发表于:2019-07-04 17:22:41
= DLookup("净值", "净值", "日期='" & Me![今日日期] & "'"),这个是在日期字段为文本类型的情况下使用,
如果日期字段为日期时间类型,就应该是
= DLookup("净值", "净值", "日期=#" & Me![今日日期] & "#")
如果日期字段为数字类型,就应该是
= DLookup("净值", "净值", "日期=" & Me![今日日期] & "")



over_fly111 发表于:2019-07-05 09:36:09

不好意思 上面那个是我复制的,不是我的问题,

我的问题是.Range("B4") = DLookup("电话", "制造部担当", "担当者='" & Me.制造部担当 & "'") 现在赋值不了。

您受累帮我看看。



西出阳关无故人 发表于:2019-07-05 14:49:13
多说无益,发实例。

over_fly111 发表于:2019-07-08 16:02:44

您好! 我试了一下,我有个表 【制造部担当】 字段有【电话】和【担当者】

然后我有个窗体,有制造部担当,我现在想当窗体制造部担当和表里担当者名字一致时候,

将电话导出到excel的B4里,,不知为啥不行呢》?

.Range("B4") = DLookup("电话", "制造部担当", "担当者='" & Me.制造部担当 & "'")



仙来 发表于:2019-07-09 10:51:10
是不是你的Me.制造部担当  空的

over_fly111 发表于:2019-07-09 11:21:34
不空啊,有具体值得,就是我在页面上把控件设为不可用了。不知道有没有关系。

总记录:12篇  页次:1/1 9 1 :