{"id":1700,"date":"2018-10-13T15:57:59","date_gmt":"2018-10-13T23:57:59","guid":{"rendered":"http:\/\/www.auval.com.mx\/notas\/?p=1700"},"modified":"2022-04-12T15:25:31","modified_gmt":"2022-04-12T22:25:31","slug":"codigo-para-buscar-un-registro-con-un-combo-en-access","status":"publish","type":"post","link":"https:\/\/auval.com.mx\/blog\/en\/2018\/10\/13\/codigo-para-buscar-un-registro-con-un-combo-en-access\/","title":{"rendered":"C\u00f3digo para buscar un registro con un combo en Access"},"content":{"rendered":"\n<p>El c\u00f3digo siguiente aparece en la liga que aqu\u00ed les paso:<\/p>\n\n\n\n<a href=\"https:\/\/support.microsoft.com\/en-ca\/help\/287658\/how-to-move-to-a-specific-record-from-a-combo-box-selection-in-microso\">Soporte<\/a>\n\n\n\n<p>Pero como yo siempre busco lo mismo, lo voy a escribir aqu\u00ed:<\/p>\n\n\n\n<pre class=\"wp-block-preformatted\">\n<br><code class=\"\">Private Sub Combo0_AfterUpdate()<br>    ' Find the record that matches the control.<br>    Dim rs As Object<br><br>    Set rs = Me.Recordset.Clone<br>    rs.FindFirst \"[ProductID] = \" &amp; Str(Nz(Me![Combo20], 0))<br>    If Not rs.EOF Then Me.Bookmark = rs.Bookmark<br>End Sub<\/code> <\/pre>\n","protected":false},"excerpt":{"rendered":"<p>El c\u00f3digo siguiente aparece en la liga que aqu\u00ed les paso: Soporte Pero como yo siempre busco lo mismo, lo voy a escribir aqu\u00ed: Private Sub Combo0_AfterUpdate() &#8216; Find the record that matches the control. Dim rs As Object Set &hellip;<\/p>\n<p class=\"read-more\"> <a class=\"more-link\" href=\"https:\/\/auval.com.mx\/blog\/en\/2018\/10\/13\/codigo-para-buscar-un-registro-con-un-combo-en-access\/\"> <span class=\"screen-reader-text\">C\u00f3digo para buscar un registro con un combo en Access<\/span> Read More &raquo;<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[3],"tags":[],"class_list":["post-1700","post","type-post","status-publish","format-standard","hentry","category-office"],"_links":{"self":[{"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/posts\/1700","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/comments?post=1700"}],"version-history":[{"count":2,"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/posts\/1700\/revisions"}],"predecessor-version":[{"id":1923,"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/posts\/1700\/revisions\/1923"}],"wp:attachment":[{"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/media?parent=1700"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/categories?post=1700"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/auval.com.mx\/blog\/en\/wp-json\/wp\/v2\/tags?post=1700"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}